Mercurial > emacs
comparison lisp/bookmark.el @ 106713:b6737bf6bd0b
* lisp/bookmark.el: Ahh, remove silly debugging cruft, sorry for the noise.
author | Karl Fogel <kfogel@red-bean.com> |
---|---|
date | Sat, 02 Jan 2010 14:03:25 -0500 |
parents | ba9ed2ec36e5 |
children | 396a004a924b |
comparison
equal
deleted
inserted
replaced
106712:ba9ed2ec36e5 | 106713:b6737bf6bd0b |
---|---|
1533 The leftmost column displays a D if the bookmark is flagged for | 1533 The leftmost column displays a D if the bookmark is flagged for |
1534 deletion, or > if it is flagged for displaying." | 1534 deletion, or > if it is flagged for displaying." |
1535 (interactive) | 1535 (interactive) |
1536 (bookmark-maybe-load-default-file) | 1536 (bookmark-maybe-load-default-file) |
1537 (let ((buf (get-buffer-create "*Bookmark List*"))) | 1537 (let ((buf (get-buffer-create "*Bookmark List*"))) |
1538 ;; fooo | |
1539 (if (called-interactively-p 'interactive) | 1538 (if (called-interactively-p 'interactive) |
1540 (if (or (window-dedicated-p) (window-minibuffer-p)) | 1539 (if (or (window-dedicated-p) (window-minibuffer-p)) |
1541 (pop-to-buffer buf) | 1540 (pop-to-buffer buf) |
1542 (switch-to-buffer buf)) | 1541 (switch-to-buffer buf)) |
1543 (set-buffer buf))) | 1542 (set-buffer buf))) |