diff --git a/misc/fuel/fuel-tests.el b/misc/fuel/fuel-tests.el index 80fe17be37..50af163d31 100644 --- a/misc/fuel/fuel-tests.el +++ b/misc/fuel/fuel-tests.el @@ -22,6 +22,7 @@ (require 'ert) (require 'fuel-help) (require 'fuel-markup) +(require 'fuel-xref) ;; fuel-markup (ert-deftest print-str () @@ -50,3 +51,6 @@ (insert "Help page contents") (fuel-help--find-in)) "foob"))) + +(ert-deftest fuel-xref-name () + (should (equal (buffer-name (fuel-xref--buffer)) "*fuel xref*"))) diff --git a/misc/fuel/fuel-xref.el b/misc/fuel/fuel-xref.el index 53e2902f6a..a4b5ac7108 100644 --- a/misc/fuel/fuel-xref.el +++ b/misc/fuel/fuel-xref.el @@ -90,7 +90,7 @@ cursor at the first ocurrence of the used word." (defun fuel-xref--buffer () (or (get-buffer "*fuel xref*") - (with-current-buffer (get-buffer-create "*fuel xref") + (with-current-buffer (get-buffer-create "*fuel xref*") (fuel-xref-mode) (fuel-popup-mode) (current-buffer))))