changeset 860:08045dee5b71

entered into RCS
author Richard M. Stallman <rms@gnu.org>
date Fri, 24 Jul 1992 04:34:12 +0000
parents 5f325fbc093d
children 345296f94a1e
files lisp/case-table.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/case-table.el	Fri Jul 24 03:49:00 1992 +0000
+++ b/lisp/case-table.el	Fri Jul 24 04:34:12 1992 +0000
@@ -48,9 +48,9 @@
 		   (concat "lowercase, matches "
 			   (text-char-description (upcase ch))))
 		  (t "case-invariant")))
-      (setq i (1+ i))))
-  (with-output-to-temp-buffer "*Help*"
-    (describe-vector vector)))
+      (setq i (1+ i)))
+    (with-output-to-temp-buffer "*Help*"
+      (describe-vector vector))))
 
 (defun set-case-syntax-delims (l r string)
   "Make characters L and R a matching pair of non-case-converting delimiters.