# HG changeset patch # User Jim Blandy # Date 721871859 0 # Node ID 9de0900ca56aa0e75e3b57f13bc0897795da985a # Parent f67f847064dc6fdfbbbb6b49c7096c4421cbd66e * simple.el (comment-column): Doc fix. * bytecomp.el: Declare unread-command-char an obsolete variable. * vip.el (vip-escape-to-emacs, vip-prefix-arg-value, vip-prefix-arg-com): Use unread-command-event instead of unread-command-char; respect its new semantics. * simula.el (simula-electric-label): Same. * comint.el (comint-dynamic-list-completions): Same. * ebuff-menu.el (electric-buffer-list, Electric-buffer-menu-exit): Same. * ehelp.el (electric-help-command-loop): Same. * electric.el (Electric-command-loop): Same. * emerge.el (emerge-show-file-name): Same. * fortran.el (fortran-abbrev-start, fortran-window-create-momentarily): Same. * gnus.el (gnus-Subject-next-article): Same. * info.el (Info-summary): Same. * isearch-mode.el (isearch-update, isearch-unread): Same. * map-ynp.el (map-y-or-n-p): Same. * mlsupport.el (push-back-character): Same. * replace.el (perform-replace): Same. * simple.el (prefix-arg-internal): Same. * subr.el (read-quoted-char, momentary-string-display): Same. * sun-mouse.el (mouse-second-hit): Same. * terminal.el (te-escape-extended-command-unread): Same. diff -r f67f847064dc -r 9de0900ca56a lisp/simple.el --- a/lisp/simple.el Sun Nov 15 23:44:05 1992 +0000 +++ b/lisp/simple.el Sun Nov 15 23:57:39 1992 +0000 @@ -769,7 +769,7 @@ (if (= (length key) 1) ;; Make sure self-insert-command finds the proper character; ;; unread the character and let the command loop process it. - (setq unread-command-char (string-to-char key)) + (setq unread-command-event (string-to-char key)) ;; We can't push back a longer string, so we'll emulate the ;; command loop ourselves. (command-execute (key-binding key))))) @@ -1406,7 +1406,9 @@ (defconst comment-column 32 "*Column to indent right-margin comments to. -Setting this variable automatically makes it local to the current buffer.") +Setting this variable automatically makes it local to the current buffer. +Each mode establishes a different default value for this variable; you +can the value for a particular mode using that mode's hook.") (make-variable-buffer-local 'comment-column) (defconst comment-start nil