From: John Wiegley <johnw@newartisans.com>
Date: Wed, 6 Feb 2002 07:07:54 +0000 (+0000)
Subject: (align-region): Added a missing name argument.
X-Git-Tag: ttn-vms-21-2-B4~16840
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=f3bbc088d26b9443681adad167c5219b147723fa;p=emacs.git

(align-region): Added a missing name argument.
---

diff --git a/lisp/align.el b/lisp/align.el
index ad4bd039661..388c090a204 100644
--- a/lisp/align.el
+++ b/lisp/align.el
@@ -1,6 +1,6 @@
 ;;; align.el --- align text to a specific column, by regexp
 
-;; Copyright (C) 1999, 2000 Free Sofware Foundation
+;; Copyright (C) 1999, 2000, 2002 Free Sofware Foundation
 
 ;; Author: John Wiegley <johnw@gnu.org>
 ;; Keywords: convenience languages lisp
@@ -1417,7 +1417,7 @@ aligner would have dealt with are."
 			      (if name
 				  (message
 				   "Aligning `%s' (rule %d of %d) %d%%..."
-				   rule-index rule-count
+				   name rule-index rule-count
 				   (/ (* (- (point) real-beg) 100)
 				      (- end-mark real-beg)))
 				(message