(auto-insert-alist): Remove nonsensical precision

specifier from format-string.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 93205ede868a30335807b4c7af52bff6d15ad541..c11137f87f210845ddf3f6c5e34652525e9de8a4 100644 (file)
--- 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 805065ba009f4b389a2ad257952aa198109bf44b..4d2be1c94e0184d6de7f226b142278f5f38ab2c7 100644 (file)
--- 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))