372 |
it queries the user and sets the -ARG'th default. |
it queries the user and sets the -ARG'th default. |
373 |
If ARG is greater than 9 (or \\[universal-argument] \\[universal-argument]), |
If ARG is greater than 9 (or \\[universal-argument] \\[universal-argument]), |
374 |
the (ARG mod 10)'th prefix is made persistent. |
the (ARG mod 10)'th prefix is made persistent. |
375 |
If ARG is NIL toggle the PREFIX's value between its 0th default and NIL |
If ARG is nil toggle the PREFIX's value between its 0th default and nil |
376 |
and reset the persistence." |
and reset the persistence." |
377 |
(let* ((prefix (symbol-value (cvs-prefix-sym sym))) |
(let* ((prefix (symbol-value (cvs-prefix-sym sym))) |
378 |
(numarg (if (integerp arg) arg 0)) |
(numarg (if (integerp arg) arg 0)) |