[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 9700744: Put point at beginning of display-time-wor
From: |
Mark Oteiza |
Subject: |
[Emacs-diffs] master 9700744: Put point at beginning of display-time-world buffer. |
Date: |
Thu, 19 May 2016 23:09:56 +0000 (UTC) |
branch: master
commit 970074470d7bc332fc36fd30feee93e1d6130177
Author: Mark Oteiza <address@hidden>
Commit: Mark Oteiza <address@hidden>
Put point at beginning of display-time-world buffer.
If display-time-world decides to popup vertically from the bottom of the
frame and scroll-margin is nonzero, the top of the buffer contents are
hidden due to scroll.
* lisp/time.el (display-time-world-display): Move point to point-min
after inserting contents.
---
lisp/time.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/lisp/time.el b/lisp/time.el
index ba57924..651dd56 100644
--- a/lisp/time.el
+++ b/lisp/time.el
@@ -535,7 +535,8 @@ See `display-time-world'."
(setq fmt (concat "%-" (int-to-string max-width) "s %s\n"))
(dolist (timedata (nreverse result))
(insert (format fmt (car timedata) (cdr timedata))))
- (delete-char -1)))
+ (delete-char -1))
+ (goto-char (point-min)))
;;;###autoload
(defun display-time-world ()
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 9700744: Put point at beginning of display-time-world buffer.,
Mark Oteiza <=