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)