emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/hyperbole 9755e7e 11/13: Small fixes from Mats


From: Stefan Monnier
Subject: [elpa] externals/hyperbole 9755e7e 11/13: Small fixes from Mats
Date: Sun, 12 May 2019 11:11:48 -0400 (EDT)

branch: externals/hyperbole
commit 9755e7e2727e255ce1e385d7b11e6051f8423885
Merge: 042842d 159082b
Author: Bob Weiner <address@hidden>
Commit: Bob Weiner <address@hidden>

    Small fixes from Mats
---
 hui-mouse.el | 2 +-
 hypb.el      | 1 +
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/hui-mouse.el b/hui-mouse.el
index 146860d..0878500 100644
--- a/hui-mouse.el
+++ b/hui-mouse.el
@@ -603,7 +603,7 @@ If key is pressed:
        ((< (current-column) 5) (calendar-cursor-to-nearest-date)
         (scroll-calendar-right-three-months 1))
        (t (calendar-cursor-to-nearest-date)
-          (view-diary-entries 1))))
+          (diary-view-entries 1))))
 
 (defun smart-calendar-assist ()
   "Uses a single assist-key or mouse assist-key to manipulate the scrolling 
calendar.
diff --git a/hypb.el b/hypb.el
index c0d0595..6abc17a 100644
--- a/hypb.el
+++ b/hypb.el
@@ -782,6 +782,7 @@ Without file, the banner is prepended to the current 
buffer."
        (setq button (make-button (- (point) 3) (- (point) 2) :type 
'hyperbole-banner))
        (button-put button 'help-echo (concat "Click to visit " hypb:home-page))
        (button-put button 'action #'hypb:browse-home-page)
+       (button-put button 'face 'default)
        (button-put button 'keymap hypb:hyperbole-banner-keymap)))))
 
 (defun hypb:display-file-with-logo-xemacs (&optional file)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]