steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

FUEL: corrected name of *fuel xref* buffer

db4
Björn Lindqvist 2014-11-05 04:42:07 +01:00 committed by John Benediktsson
parent bc3a6660b8
commit 82c71577d2
2 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
misc/fuel/fuel-tests.el
View File

@ -22,6 +22,7 @@
(require 'ert) (require 'ert)
(require 'fuel-help) (require 'fuel-help)
(require 'fuel-markup) (require 'fuel-markup)
(require 'fuel-xref)
;; fuel-markup ;; fuel-markup
(ert-deftest print-str () (ert-deftest print-str ()
@ -50,3 +51,6 @@
(insert "Help page contents") (insert "Help page contents")
(fuel-help--find-in)) (fuel-help--find-in))
"foob"))) "foob")))
(ert-deftest fuel-xref-name ()
(should (equal (buffer-name (fuel-xref--buffer)) "*fuel xref*")))

2
misc/fuel/fuel-xref.el
View File

@ -90,7 +90,7 @@ cursor at the first ocurrence of the used word."
(defun fuel-xref--buffer () (defun fuel-xref--buffer ()
(or (get-buffer "*fuel xref*") (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-xref-mode)
(fuel-popup-mode) (fuel-popup-mode)
(current-buffer)))) (current-buffer))))