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

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

[elpa] externals/hyperbole f273294945 2/2: Merge branch 'master' of http


From: ELPA Syncer
Subject: [elpa] externals/hyperbole f273294945 2/2: Merge branch 'master' of https://github.com/rswgnu/hyperbole
Date: Mon, 3 Jan 2022 12:57:27 -0500 (EST)

branch: externals/hyperbole
commit f273294945999299572ad0174df88cad42ebd31c
Merge: 0188fabf8d 7c461c8038
Author: Robert Weiner <rsw@gnu.org>
Commit: Robert Weiner <rsw@gnu.org>

    Merge branch 'master' of https://github.com/rswgnu/hyperbole
---
 ChangeLog         | 3 +++
 test/hui-tests.el | 6 +++---
 2 files changed, 6 insertions(+), 3 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index afc9d96c4f..5860e2c84f 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -16,6 +16,9 @@
 
 2022-01-02  Mats Lidell  <matsl@gnu.org>
 
+* test/hui-tests.el (hui-ebut-create-link-to-info-index-using-completion):
+    Link to emacs info index.
+
 * test/hy-test-helpers.el (hy-test-helpers:action-key-should-call-hpath:find)
     (hy-test-helpers:hypb-function-should-call-hpath:find): Do a string
     match and expand-file-name match.
diff --git a/test/hui-tests.el b/test/hui-tests.el
index 11e9eef69d..d3fe147b56 100644
--- a/test/hui-tests.el
+++ b/test/hui-tests.el
@@ -143,11 +143,11 @@ Modifying the button but keeping the label creates a 
dubbel label."
     (unwind-protect
         (progn
           (find-file file)
-          (should (hact 'kbd-key "C-h h e c hypb-intro-button RET RET 
link-to-Info-index-item RET (hyperbole)Introduct TAB RET"))
+          (should (hact 'kbd-key "C-h h e c emacs-package-button RET RET 
link-to-Info-index-item RET (emacs)packag TAB RET"))
           (hy-test-helpers:consume-input-events)
           (should (eq (hattr:get (hbut:at-p) 'actype) 
'actypes::link-to-Info-index-item))
-          (should (equal (hattr:get (hbut:at-p) 'args) 
'("(hyperbole)Introduction")))
-          (should (equal (hattr:get (hbut:at-p) 'lbl-key) 
"hypb-intro-button")))
+          (should (equal (hattr:get (hbut:at-p) 'args) '("(emacs)Package")))
+          (should (equal (hattr:get (hbut:at-p) 'lbl-key) 
"emacs-package-button")))
       (progn
         (kill-buffer "*info*")
         (delete-file file)))))



reply via email to

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