From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: org-bookmark.el Date: Wed, 27 Feb 2008 17:06:23 +0100 Message-ID: <68348BE0-967F-4544-B6A0-2C1EA2AF50CF@science.uva.nl> References: Mime-Version: 1.0 (Apple Message framework v919.2) Content-Type: text/plain; charset=US-ASCII; format=flowed; delsp=yes Content-Transfer-Encoding: 7bit Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1JUOo3-0002OI-Ks for emacs-orgmode@gnu.org; Wed, 27 Feb 2008 11:06:55 -0500 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1JUOo2-0002Mv-3N for emacs-orgmode@gnu.org; Wed, 27 Feb 2008 11:06:54 -0500 Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1JUOo1-0002Mo-Tu for emacs-orgmode@gnu.org; Wed, 27 Feb 2008 11:06:53 -0500 Received: from fk-out-0910.google.com ([209.85.128.184]) by monty-python.gnu.org with esmtp (Exim 4.60) (envelope-from ) id 1JUOo1-0003XR-7w for emacs-orgmode@gnu.org; Wed, 27 Feb 2008 11:06:53 -0500 Received: by fk-out-0910.google.com with SMTP id 26so3298507fkx.10 for ; Wed, 27 Feb 2008 08:06:52 -0800 (PST) In-Reply-To: List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Tokuya Kameshima Cc: emacs-orgmode@gnu.org Hi Tokuya, this is nice, do you want me to add this to our distribution? - Carsten On Feb 27, 2008, at 4:39 PM, Tokuya Kameshima wrote: > Hi, > > I wrote an emacs code, org-bookmark.el, which supports for orgmode > links to Emacs bookmarks. You can store the links in the Bookmark > List buffer by running M-x org-store-link. > > Not sure it's useful, but I regularly uses this bookmark links to > follow daily or weekly changing file links. > > Thanks, > --Tokuya > > > ;;; org-bookmark.el - Support for links to Emacs bookmark > ;; Carstens outline-mode for keeping track of everything. > ;; Copyright (C) 2008 Free Software Foundation, Inc. > ;; > ;; Author: Tokuya Kameshima > ;; Version: 1.0 > ;; Keywords: outlines, hypermedia, calendar, wp > ;; > ;; This file is part of GNU Emacs. > ;; > ;; Emacs is free software; you can redistribute it and/or modify > ;; it under the terms of the GNU General Public License as published > by > ;; the Free Software Foundation; either version 3, or (at your option) > ;; any later version. > > ;; GNU Emacs is distributed in the hope that it will be useful, > ;; but WITHOUT ANY WARRANTY; without even the implied warranty of > ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the > ;; GNU General Public License for more details. > > ;; You should have received a copy of the GNU General Public License > ;; along with GNU Emacs; see the file COPYING. If not, write to the > ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, > ;; Boston, MA 02110-1301, USA. > ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; > > (require 'org) > (require 'bookmark) > > (org-add-link-type "bookmark" 'org-bookmark-open) > (add-hook 'org-store-link-functions 'org-bookmark-store-link) > > (defun org-bookmark-open (bookmark) > "Visit the bookmark BOOKMARK." > (bookmark-jump bookmark)) > > (defun org-bookmark-store-link () > "Store a link to the current line's bookmark in Emacs bookmark list > window." > (if (eq major-mode 'bookmark-bmenu-mode) > (let ((bookmark (bookmark-bmenu-bookmark))) > (if bookmark > (org-store-link-props :link (org-make-link "bookmark:" bookmark) > :description bookmark))))) > > (provide 'org-bookmark) > > ;;; org-bookmark.el ends here > > > _______________________________________________ > Emacs-orgmode mailing list > Remember: use `Reply All' to send replies to the list. > Emacs-orgmode@gnu.org > http://lists.gnu.org/mailman/listinfo/emacs-orgmode