[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: gtags.el: add function to kill all gtags buffers
From: |
Shigio YAMAGUCHI |
Subject: |
Re: gtags.el: add function to kill all gtags buffers |
Date: |
Thu, 21 Jan 2010 16:13:29 +0900 |
> Fixed to cleanup tag stack also:
>
> (defun gtags-kill-buffers ()
> "Kill all GTAGS buffers."
> (interactive)
> (mapcar (function (lambda (buffer)
> (let ((bname (buffer-name buffer)))
> (if (string-match "^\*GTAGS" bname)
> (kill-buffer buffer)))))
> (buffer-list))
> (setq gtags-buffer-stack nil
> gtags-point-stack nil
> gtags-current-buffer nil))
It seems that cleaning the entire stack is a little violent.
Don't you want to clear 'GTAGS SELECT MODE' buffers alone?
--
Shigio YAMAGUCHI <address@hidden>
PGP fingerprint: D1CB 0B89 B346 4AB6 5663 C4B6 3CA5 BBB3 57BE DDA3