comparison lisp/buff-menu.el @ 410:de805c49cfc1 r21-2-35

Import from CVS: tag r21-2-35
author cvs
date Mon, 13 Aug 2007 11:19:21 +0200
parents 2f8bb876ab1d
children 697ef44129c6
comparison
equal deleted inserted replaced
409:301b9ebbdf3b 410:de805c49cfc1
354 (other-window 1) ;back to the beginning! 354 (other-window 1) ;back to the beginning!
355 ))) 355 )))
356 356
357 357
358 358
359 (eval-when-compile (autoload 'visit-tags-table "etags"))
360
359 (defun Buffer-menu-visit-tags-table () 361 (defun Buffer-menu-visit-tags-table ()
360 "Visit the tags table in the buffer on this line. See `visit-tags-table'." 362 "Visit the tags table in the buffer on this line. See `visit-tags-table'."
361 (interactive) 363 (interactive)
362 (let ((file (buffer-file-name (Buffer-menu-buffer t)))) 364 (let ((file (buffer-file-name (Buffer-menu-buffer t))))
363 (if file 365 (if file