[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
align.el bugfix patch
From: |
Karl Chen |
Subject: |
align.el bugfix patch |
Date: |
Mon, 29 Apr 2002 20:09:14 -0700 |
A bug in align.el's `align-region' causes it to die on large regions. The
call to `message' is missing an argument, plus it doesn't correctly
determine if a variable has a symbol name or not.
Diff fix to version 21.1 below.
--
Karl
*** .backup/align.el.~1~ Mon Oct 22 21:19:57 2001
--- align.el Mon Apr 29 19:53:50 2002
***************
*** 1413,1422 ****
;; are, if it's a very large region being
;; aligned
(if report
! (let ((name (symbol-name (car rule))))
! (if name
(message
"Aligning `%s' (rule %d of %d) %d%%..."
rule-index rule-count
(/ (* (- (point) real-beg) 100)
(- end-mark real-beg)))
--- 1413,1423 ----
;; are, if it's a very large region being
;; aligned
(if report
! (let ((symbol (car rule)))
! (if (and symbol (symbolp symbol))
(message
"Aligning `%s' (rule %d of %d) %d%%..."
+ (symbol-name symbol)
rule-index rule-count
(/ (* (- (point) real-beg) 100)
(- end-mark real-beg)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- align.el bugfix patch,
Karl Chen <=