X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fformat-spec.el;h=99116ef52fbd45c75ee194e19985d7f4bddc44ed;hb=27688c4fe73986a46e3f2cb9051170f41ef82f4c;hp=6cd39ede7214b5e94d1b6693947e599b3eaea42e;hpb=a2d6af2c24264119c5aff0ef0063733674eef102;p=elisp%2Fgnus.git- diff --git a/lisp/format-spec.el b/lisp/format-spec.el index 6cd39ed..99116ef 100644 --- a/lisp/format-spec.el +++ b/lisp/format-spec.el @@ -18,8 +18,8 @@ ;; You should have received a copy of the GNU General Public License ;; along with GNU Emacs; see the file COPYING. If not, write to the -;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, -;; Boston, MA 02111-1307, USA. +;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, +;; Boston, MA 02110-1301, USA. ;;; Commentary: @@ -47,7 +47,7 @@ to values." (val (cdr (assq spec specification)))) (delete-region (1- (match-beginning 0)) (match-end 0)) (unless val - (error "Invalid format character: %s" spec)) + (error "Invalid format character: `%%%c'" spec)) (insert (format (concat "%" num "s") val)))) ;; Signal an error on bogus format strings. (t