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))) |