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

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

[elpa] scratch/hyperbole-merge-7.0.2b 5892083 09/23: Use new treemacs 1.


From: Stefan Monnier
Subject: [elpa] scratch/hyperbole-merge-7.0.2b 5892083 09/23: Use new treemacs 1.18 function treemacs-toggle-node
Date: Tue, 5 Feb 2019 16:11:19 -0500 (EST)

branch: scratch/hyperbole-merge-7.0.2b
commit 58920837c68ecf5035228f209e1de0a81b83b417
Author: Mats Lidell <address@hidden>
Commit: Mats Lidell <address@hidden>

    Use new treemacs 1.18 function treemacs-toggle-node
    
    Remove use of deprecated function treemacs-push-button and update the
    version check for 1.18 both loading el and elc file.
---
 hui-treemacs.el | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/hui-treemacs.el b/hui-treemacs.el
index db1aee6..ca947d8 100644
--- a/hui-treemacs.el
+++ b/hui-treemacs.el
@@ -4,7 +4,7 @@
 ;;
 ;; Orig-Date:    19-Nov-17
 ;;
-;; Copyright (C) 2017  Free Software Foundation, Inc.
+;; Copyright (C) 2017-2018  Free Software Foundation, Inc.
 ;; See the "HY-COPY" file for license information.
 ;;
 ;; This file is part of GNU Hyperbole.
@@ -18,9 +18,9 @@
 
 (eval-and-compile (require 'treemacs nil t))
 
-(eval-when (load)
-  (unless (>= (string-to-number treemacs-version) 1.14)
-    (error "(hui-treemacs): Hyperbole requires Treemacs package version 1.14 
or greater")))
+(progn ()
+  (unless (>= (string-to-number treemacs-version) 1.18)
+    (error "(hui-treemacs): Hyperbole requires Treemacs package version 1.18 
or greater")))
 
 ;;; ************************************************************************
 ;;; smart-treemacs functions
@@ -65,7 +65,7 @@ If key is pressed:
                     (hact 'link-to-buffer-tmp (seq-elt result 0) (seq-elt 
result 1))
                   ;; (bufferp result)
                   (hact 'link-to-buffer-tmp result))
-              (treemacs-push-button current-prefix-arg))))))
+              (treemacs-toggle-node current-prefix-arg))))))
 
 ;;;###autoload
 (defun smart-treemacs-modeline ()



reply via email to

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