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)