From: Martin Rudalics <rudalics@gmx.at>
Date: Fri, 21 Dec 2007 10:19:54 +0000 (+0000)
Subject: (auto-insert-alist): Remove nonsensical precision
X-Git-Tag: emacs-pretest-22.1.90~249
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=888b59787114c5d931935c49efd9861e8fa382d3;p=emacs.git

(auto-insert-alist): Remove nonsensical precision
specifier from format-string.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 93205ede868..c11137f87f2 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2007-12-21  Martin Rudalics  <rudalics@gmx.at>
+
+	* autoinsert.el (auto-insert-alist): Remove nonsensical precision
+	specifier from format-string.  Reported by Ye Wenbin.
+
 2007-12-19  Martin Rudalics  <rudalics@gmx.at>
 
 	* cus-start.el (all): Use correct group name for members of
diff --git a/lisp/autoinsert.el b/lisp/autoinsert.el
index 805065ba009..4d2be1c94e0 100644
--- a/lisp/autoinsert.el
+++ b/lisp/autoinsert.el
@@ -179,7 +179,7 @@ If this contains a %s, that will be replaced by the matching rule."
  ;;'(setq v1 (apply 'vector (mapcar 'car finder-known-keywords)))
  '(setq v1 (mapcar (lambda (x) (list (symbol-name (car x))))
 		   finder-known-keywords)
-	v2 (mapconcat (lambda (x) (format "%10.0s:  %s" (car x) (cdr x)))
+	v2 (mapconcat (lambda (x) (format "%12s:  %s" (car x) (cdr x)))
 	   finder-known-keywords
 	   "\n"))
  ((let ((minibuffer-help-form v2))