* term/vt100.el (vt100-wide-mode): Fix :init-value keyword (bug#6620).

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 5ead7c3856ab0daefe09bc13880caa60dc16d7be..2ef5d1509c08eb0089fab6e6ec0e3e402529f09f 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2010-07-22  Lawrence Mitchell  <wence@gmx.li>
+
+       * term/vt100.el (vt100-wide-mode): Fix :init-value keyword (bug#6620).
+
 2010-07-21  Michael Albinus  <michael.albinus@gmx.de>
 
        * net/tramp.el (tramp-get-ls-command)

diff --git a/lisp/term/vt100.el b/lisp/term/vt100.el
index 017c976ed512020f2ab7f32ccc7725a0da86d048..24561fe835fabe8ad83d933af0df8f06d7a0abb3 100644 (file)
--- a/lisp/term/vt100.el
+++ b/lisp/term/vt100.el
@@ -45,7 +45,7 @@
   "Toggle 132/80 column mode for vt100s.
 With positive argument, switch to 132-column mode.
 With negative argument, switch to 80-column mode."
-  :global t :initial-value (= (frame-width) 132)
+  :global t :init-value (= (frame-width) 132)
   (send-string-to-terminal (if vt100-wide-mode "\e[?3h" "\e[?3l"))
   (set-frame-width terminal-frame (if vt100-wide-mode 132 80)))