diff options
| -rw-r--r-- | lisp/simple.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/simple.el b/lisp/simple.el index 2399733e646..c0d796b97b7 100644 --- a/lisp/simple.el +++ b/lisp/simple.el | |||
| @@ -769,7 +769,7 @@ Repeating \\[universal-argument] without digits or minus sign | |||
| 769 | (if (= (length key) 1) | 769 | (if (= (length key) 1) |
| 770 | ;; Make sure self-insert-command finds the proper character; | 770 | ;; Make sure self-insert-command finds the proper character; |
| 771 | ;; unread the character and let the command loop process it. | 771 | ;; unread the character and let the command loop process it. |
| 772 | (setq unread-command-char (string-to-char key)) | 772 | (setq unread-command-event (string-to-char key)) |
| 773 | ;; We can't push back a longer string, so we'll emulate the | 773 | ;; We can't push back a longer string, so we'll emulate the |
| 774 | ;; command loop ourselves. | 774 | ;; command loop ourselves. |
| 775 | (command-execute (key-binding key))))) | 775 | (command-execute (key-binding key))))) |
| @@ -1406,7 +1406,9 @@ With argument 0, interchanges line point is in with line mark is in." | |||
| 1406 | 1406 | ||
| 1407 | (defconst comment-column 32 | 1407 | (defconst comment-column 32 |
| 1408 | "*Column to indent right-margin comments to. | 1408 | "*Column to indent right-margin comments to. |
| 1409 | Setting this variable automatically makes it local to the current buffer.") | 1409 | Setting this variable automatically makes it local to the current buffer. |
| 1410 | Each mode establishes a different default value for this variable; you | ||
| 1411 | can the value for a particular mode using that mode's hook.") | ||
| 1410 | (make-variable-buffer-local 'comment-column) | 1412 | (make-variable-buffer-local 'comment-column) |
| 1411 | 1413 | ||
| 1412 | (defconst comment-start nil | 1414 | (defconst comment-start nil |