47 |
With positive argument, switch to 132-column mode. |
With positive argument, switch to 132-column mode. |
48 |
With negative argument, switch to 80-column mode." |
With negative argument, switch to 80-column mode." |
49 |
(interactive "P") |
(interactive "P") |
50 |
(setq vt100-wide-mode |
(setq vt100-wide-mode |
51 |
(if (null arg) (not vt100-wide-mode) |
(if (null arg) (not vt100-wide-mode) |
52 |
(> (prefix-numeric-value arg) 0))) |
(> (prefix-numeric-value arg) 0))) |
53 |
(send-string-to-terminal (if vt100-wide-mode "\e[?3h" "\e[?3l")) |
(send-string-to-terminal (if vt100-wide-mode "\e[?3h" "\e[?3l")) |