diff options
| -rw-r--r-- | lisp/emacs-lisp/lisp-mode.el | 2 | ||||
| -rw-r--r-- | lisp/flow-ctrl.el | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/lisp-mode.el b/lisp/emacs-lisp/lisp-mode.el index 6cf7253b44..f6fb07b0d2 100644 --- a/lisp/emacs-lisp/lisp-mode.el +++ b/lisp/emacs-lisp/lisp-mode.el @@ -255,7 +255,7 @@ rigidly along with this one." (skip-chars-forward " \t") (if (looking-at "\\s<\\s<\\s<") ;; Don't alter indentation of a ;;; comment line. - nil + (goto-char (- (point-max) pos)) (if (and (looking-at "\\s<") (not (looking-at "\\s<\\s<"))) ;; Single-semicolon comment lines should be indented ;; as comment lines, not as code. diff --git a/lisp/flow-ctrl.el b/lisp/flow-ctrl.el index 4d3d68f49b..104aee3ac8 100644 --- a/lisp/flow-ctrl.el +++ b/lisp/flow-ctrl.el @@ -72,9 +72,9 @@ ;;;###autoload (defun evade-flow-control-on (&rest losing-terminal-types) "Enable flow control if using one of a specified set of terminal types. -Use `(evade-flow-control-on "vt100" "h19")' to enable flow control +Use `(evade-flow-control-on \"vt100\" \"h19\")' to enable flow control on VT-100 and H19 terminals. When flow control is enabled, -you must type C-\ to get the effect of a C-s, and type C-^ +you must type C-\\ to get the effect of a C-s, and type C-^ to get the effect of a C-q." (let ((term (getenv "TERM")) hyphend) |