Mercurial > emacs
changeset 677:7a9b4ea68565
*** empty log message ***
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 03 Jun 1992 05:58:08 +0000 |
parents | a9a0a9efe0de |
children | 8cff3b3bd089 |
files | lisp/emacs-lisp/lisp-mode.el lisp/flow-ctrl.el |
diffstat | 2 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/emacs-lisp/lisp-mode.el Wed Jun 03 03:18:42 1992 +0000 +++ b/lisp/emacs-lisp/lisp-mode.el Wed Jun 03 05:58:08 1992 +0000 @@ -255,7 +255,7 @@ (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.
--- a/lisp/flow-ctrl.el Wed Jun 03 03:18:42 1992 +0000 +++ b/lisp/flow-ctrl.el Wed Jun 03 05:58:08 1992 +0000 @@ -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)