* ggtags.el: Fix bug#13829; release v0.6.1

[gnu-emacs-elpa] / packages / ggtags / ggtags.el

diff --git a/packages/ggtags/ggtags.el b/packages/ggtags/ggtags.el
index 601f466a4c56801c6d31ac5bfa8596b23865584e..20600bfb2a190cf3da05439d9d05bb3d00e22715 100644 (file)
--- a/packages/ggtags/ggtags.el
+++ b/packages/ggtags/ggtags.el
@@ -3,7 +3,7 @@
 ;; Copyright (C) 2013  Free Software Foundation, Inc.
 
 ;; Author: Leo Liu <sdl.web@gmail.com>
-;; Version: 0.6
+;; Version: 0.6.1
 ;; Keywords: tools, convenience
 ;; Created: 2013-01-29
 ;; URL: https://github.com/leoliu/ggtags
@@ -287,6 +287,7 @@ When called with prefix, ask the name and kind of tag."
                    (point) 'compilation-message))))
     (ggtags-navigation-mode -1)
     ;; 0.5s delay for `ggtags-auto-jump-to-first-match'
+    (sit-for 0)                    ; See: http://debbugs.gnu.org/13829
     (ggtags-navigation-mode-cleanup buf 0.5)))
 
 (define-compilation-mode ggtags-global-mode "Global"
@@ -338,8 +339,7 @@ When called with prefix, ask the name and kind of tag."
            (when (and (derived-mode-p 'ggtags-global-mode)
                       (get-buffer-window))
              (delete-window (get-buffer-window)))
-           (and time (run-with-idle-timer time nil
-                                          'kill-buffer (current-buffer)))))))
+           (and time (run-with-idle-timer time nil 'kill-buffer buf))))))
 
 (defun ggtags-navigation-mode-done ()
   (interactive)