From 74fd23805e05c0a10eadd8863f10daf6248c1a1b Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Fri, 28 Jan 2000 17:27:56 +0000 Subject: [PATCH] (what-cursor-position): Change formatting of messages. --- lisp/simple.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/lisp/simple.el b/lisp/simple.el index d4e34049c2a..ac5412ed290 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -491,9 +491,9 @@ addition, the encoding is fully shown." (col (current-column))) (if (= pos end) (if (or (/= beg 1) (/= end (1+ total))) - (message "point=%d of %d(%d%%) <%d - %d> column %d %s" + (message "point=%d of %d (%d%%) <%d - %d> column %d %s" pos total percent beg end col hscroll) - (message "point=%d of %d(%d%%) column %d %s" + (message "point=%d of %d (%d%%) column %d %s" pos total percent col hscroll)) (let ((coding buffer-file-coding-system) encoded encoding-msg) @@ -524,12 +524,12 @@ addition, the encoding is fully shown." (buffer-substring-no-properties (point) (1+ (point)))) encoding-msg (split-char char)) (if (or (/= beg 1) (/= end (1+ total))) - (message "Char: %s %s point=%d of %d(%d%%) <%d - %d> column %d %s" + (message "Char: %s %s point=%d of %d (%d%%) <%d - %d> column %d %s" (if (< char 256) (single-key-description char) (buffer-substring-no-properties (point) (1+ (point)))) encoding-msg pos total percent beg end col hscroll) - (message "Char: %s %s point=%d of %d(%d%%) column %d %s" + (message "Char: %s %s point=%d of %d (%d%%) column %d %s" (if (< char 256) (single-key-description char) (buffer-substring-no-properties (point) (1+ (point)))) -- 2.39.5