Calculate list of tags before popping to history buffer, because the …

…current buffer is taken into consideration when the backend is determined.
markhepburn · Sep 15, 2009 · f77bf7f · f77bf7f
1 parent de96d36
commit f77bf7f
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/tags-view.el b/tags-view.el
@@ -136,14 +136,14 @@ etc).  The following options will be available:
 
 \\{tags-history-mode-map}"
   (interactive)
-  (let ((buf (get-buffer-create "*tags history*")))
+  (let ((buf (get-buffer-create "*tags history*"))
+        (tag-items (tv-get-tags-list)))
     (pop-to-buffer buf)
     (setq buffer-read-only nil)
     (let ((inhibit-read-only t))
       (erase-buffer))
     (tags-history-mode)
-    (let ((tag-items (tv-get-tags-list)))
-      (tv-insert-items tag-items))
+    (tv-insert-items tag-items)
     (setq buffer-read-only t)
     (goto-char 0)))