Topic: read only variables?

[daron]

Does anyone know of a way to determine if a variable is read-only?
Ex. Getvar would give you the value of a say viewtwist, but setvar of the same variable would create an error.

[Keith™]

I don't think so, but you can trap them in lisp

[daron]

Can you trap them in an if statement to just bypass them if they're in a list being processed with mapcar? How?

[Keith™]

You wouldn't be able to trap the error in an if statement

[ronjonp]

something like this?

Code: [Select]

  (foreach x '((acadlspasdoc . 1)
       (angdir . 0)
       (apbox . 1)
       (aperture . 8)
       (attdia . 1)
       (attmode . 1)
       (auditctl . 0)
      )
    (vl-catch-all-apply 'setvar (list (car x) (cdr x)))
  )

[Keith™]

uh .. so I am wrong ... me forgot about vl-catch-all DOH!

[daron]

Oh that's so nice and easy. Thanks Ron and Keith.

[ronjonp]

You're welcome

[daron]

That works great. Now, anybody who may have gotten the function I've thrown out for simplifying setvars, I hadn't run across RO variables until today, thus this need. So if anyone has taken this or any variation of it, please update your files.

Code: [Select]

(defun remapvars (lst)
     (mapcar '(lambda (x)
   (vl-catch-all-apply 'setvar (list (car x) (cdr x)))
      )
     lst
     )
)