summaryrefslogtreecommitdiff
path: root/lisp/align.el
diff options
context:
space:
mode:
authorJohn Wiegley <johnw@newartisans.com>2000-08-29 00:47:45 +0000
committerJohn Wiegley <johnw@newartisans.com>2000-08-29 00:47:45 +0000
commitca7aae916bab6783c5133d8432b61d97b8ffa923 (patch)
tree1b36d8d391a6a0c166fd27a01acbc92a92020530 /lisp/align.el
parentb4bd214e74d885552fe38051253dbc2b362bfe67 (diff)
downloademacs-ca7aae916bab6783c5133d8432b61d97b8ffa923.tar.gz
See ChangeLog
Diffstat (limited to 'lisp/align.el')
-rw-r--r--lisp/align.el6
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/align.el b/lisp/align.el
index 0c7184678d7..4a3b098ec2b 100644
--- a/lisp/align.el
+++ b/lisp/align.el
@@ -873,7 +873,8 @@ on the format of these lists."
(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 @@ to be colored."
(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))