Mercurial > emacs

diff lisp/align.el @ 31241:3099993cba0f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
See ChangeLog
author John Wiegley <johnw@newartisans.com>
date Tue, 29 Aug 2000 00:47:45 +0000
parents 7bd10623068c
children b09ded79f0f9
line wrap: on
line diff
--- a/lisp/align.el	Tue Aug 29 00:37:10 2000 +0000
+++ b/lisp/align.el	Tue Aug 29 00:47:45 2000 +0000
@@ -873,7 +873,8 @@
   (interactive "r")
   (let ((separator
 	 (or separate
-	     (if (symbolp align-region-separate)
+	     (if (and (symbolp align-region-separate)
+		      (boundp align-region-separate))
 		 (symbol-value align-region-separate)
 	       align-region-separate)
 	     'entire)))
@@ -1038,7 +1039,8 @@
 (defun align-newline-and-indent ()
   "A replacement function for `newline-and-indent', aligning as it goes."
   (interactive)
-  (let ((separate (or (if (symbolp align-region-separate)
+  (let ((separate (or (if (and (symbolp align-region-separate)
+			       (boundp align-region-separate))
 			  (symbol-value align-region-separate)
 			align-region-separate)
 		      'entire))