From 82c71577d2799e7817d4fcf0acca09188c3179f8 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Bj=C3=B6rn=20Lindqvist?= Date: Wed, 5 Nov 2014 04:42:07 +0100 Subject: [PATCH] FUEL: corrected name of *fuel xref* buffer --- misc/fuel/fuel-tests.el | 4 ++++ misc/fuel/fuel-xref.el | 2 +- 2 files changed, 5 insertions(+), 1 deletion(-) 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))))