638 |
"Reconfigure the state of `array-rows-numbered' and `array-columns-per-line'. |
"Reconfigure the state of `array-rows-numbered' and `array-columns-per-line'. |
639 |
NEW-COLUMNS-PER-LINE is the desired value of `array-columns-per-line' and |
NEW-COLUMNS-PER-LINE is the desired value of `array-columns-per-line' and |
640 |
NEW-ROWS-NUMBERED (a character, either ?y or ?n) is the desired value |
NEW-ROWS-NUMBERED (a character, either ?y or ?n) is the desired value |
641 |
of array-rows-numbered." |
of `array-rows-numbered'." |
642 |
(interactive "nColumns per line: \ncRows numbered? (y or n) ") |
(interactive "nColumns per line: \ncRows numbered? (y or n) ") |
643 |
;; Check on new-columns-per-line |
;; Check on new-columns-per-line |
644 |
(let ((check t)) |
(let ((check t)) |
717 |
(let ((inhibit-quit t)) |
(let ((inhibit-quit t)) |
718 |
(set-buffer main-buffer) |
(set-buffer main-buffer) |
719 |
(erase-buffer) |
(erase-buffer) |
720 |
(insert-buffer temp-buffer) |
(insert-buffer-substring temp-buffer) |
721 |
;; Update local variables. |
;; Update local variables. |
722 |
(setq array-columns-per-line new-columns-per-line) |
(setq array-columns-per-line new-columns-per-line) |
723 |
(setq array-rows-numbered new-rows-numbered) |
(setq array-rows-numbered new-rows-numbered) |
767 |
(move-to-column column))))) |
(move-to-column column))))) |
768 |
|
|
769 |
(defun untabify-backward () |
(defun untabify-backward () |
770 |
"Untabify the preceding tab." |
"Untabify the preceding TAB." |
771 |
(save-excursion |
(save-excursion |
772 |
(let ((start (point))) |
(let ((start (point))) |
773 |
(backward-char 1) |
(backward-char 1) |
817 |
The array MUST reside at the top of the buffer. |
The array MUST reside at the top of the buffer. |
818 |
|
|
819 |
TABs are not respected, and may be converted into spaces at any time. |
TABs are not respected, and may be converted into spaces at any time. |
820 |
Setting the variable 'array-respect-tabs to non-nil will prevent TAB conversion, |
Setting the variable `array-respect-tabs' to non-nil will prevent TAB conversion, |
821 |
but will cause many functions to give errors if they encounter one. |
but will cause many functions to give errors if they encounter one. |
822 |
|
|
823 |
Upon entering array mode, you will be prompted for the values of |
Upon entering array mode, you will be prompted for the values of |