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

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

[elpa] externals/org abc34b458f 43/50: org-mouse: Make recently ported c


From: ELPA Syncer
Subject: [elpa] externals/org abc34b458f 43/50: org-mouse: Make recently ported change compatible with Emacs < 29
Date: Tue, 4 Oct 2022 21:58:02 -0400 (EDT)

branch: externals/org
commit abc34b458f6a79333ddca6404bf38f196a804a40
Author: Kyle Meyer <kyle@kyleam.com>
Commit: Kyle Meyer <kyle@kyleam.com>

    org-mouse: Make recently ported change compatible with Emacs < 29
    
    * lisp/org-mouse.el (org-mouse-show-context-menu): Conditionally
    restore old code path, falling back to double-click-time if
    mouse-double-click-time isn't available.
    
    This is a follow-up to the port of Emacs's 2fba71cf1.
---
 lisp/org-mouse.el | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/lisp/org-mouse.el b/lisp/org-mouse.el
index 0b067f0746..817a2d1b05 100644
--- a/lisp/org-mouse.el
+++ b/lisp/org-mouse.el
@@ -211,7 +211,11 @@ this function is called.  Otherwise, the current major 
mode menu is used."
   (interactive "@e \nP")
   (if (and (= (event-click-count event) 1)
           (or (not mark-active)
-               (sit-for (/ (mouse-double-click-time) 1000.0))))
+               (sit-for
+                (/ (if (fboundp 'mouse-double-click-time) ; Emacs >= 29
+                       (mouse-double-click-time)
+                     double-click-time)
+                   1000.0))))
       (progn
        (select-window (posn-window (event-start event)))
        (when (not (org-mouse-mark-active))



reply via email to

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