Mercurial > hg > xemacs-beta
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 |