Mercurial > emacs
comparison lisp/bookmark.el @ 107617:c5f9e4613394
Merge from mainline.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Sat, 16 Jan 2010 06:57:09 -0500 |
parents | 203a882ff4c0 |
children | 063e00f61d0f |
comparison
equal
deleted
inserted
replaced
107616:fa5ad3eee9f5 | 107617:c5f9e4613394 |
---|---|
1 ;;; bookmark.el --- set bookmarks, maybe annotate them, jump to them later | 1 ;;; bookmark.el --- set bookmarks, maybe annotate them, jump to them later |
2 | 2 |
3 ;; Copyright (C) 1993, 1994, 1995, 1996, 1997, 2001, 2002, 2003, | 3 ;; Copyright (C) 1993, 1994, 1995, 1996, 1997, 2001, 2002, 2003, |
4 ;; 2004, 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc. | 4 ;; 2004, 2005, 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc. |
5 | 5 |
6 ;; Author: Karl Fogel <kfogel@red-bean.com> | 6 ;; Author: Karl Fogel <kfogel@red-bean.com> |
7 ;; Maintainer: Karl Fogel <kfogel@red-bean.com> | 7 ;; Maintainer: Karl Fogel <kfogel@red-bean.com> |
8 ;; Created: July, 1993 | 8 ;; Created: July, 1993 |
9 ;; Keywords: bookmarks, placeholders, annotations | 9 ;; Keywords: bookmarks, placeholders, annotations |
1958 (forward-line 1) | 1958 (forward-line 1) |
1959 (bookmark-bmenu-ensure-position)) | 1959 (bookmark-bmenu-ensure-position)) |
1960 | 1960 |
1961 | 1961 |
1962 (defun bookmark-bmenu-execute-deletions () | 1962 (defun bookmark-bmenu-execute-deletions () |
1963 "Delete bookmarks marked with \\<Buffer-menu-mode-map>\\[Buffer-menu-delete] commands." | 1963 "Delete bookmarks flagged `D'." |
1964 (interactive) | 1964 (interactive) |
1965 (message "Deleting bookmarks...") | 1965 (message "Deleting bookmarks...") |
1966 (let ((o-point (point)) | 1966 (let ((o-point (point)) |
1967 (o-str (save-excursion | 1967 (o-str (save-excursion |
1968 (beginning-of-line) | 1968 (beginning-of-line) |