From mboxrd@z Thu Jan 1 00:00:00 1970 From: Karl Voit Subject: Re: Add caching to org-buffer-property-keys Date: Sun, 17 Apr 2016 21:28:06 +0200 Message-ID: <2016-04-17T21-27-17@devnull.Karl-Voit.at> References: <2016-03-02T12-21-52@devnull.Karl-Voit.at> <56D73594.6090908@free.fr> <2016-04-12T15-52-23@devnull.Karl-Voit.at> <878u0i3e6s.fsf@gmail.com> Reply-To: Karl Voit Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:34376) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1arsMp-00067O-6y for emacs-orgmode@gnu.org; Sun, 17 Apr 2016 15:28:24 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1arsMl-0001mq-PM for emacs-orgmode@gnu.org; Sun, 17 Apr 2016 15:28:23 -0400 Received: from plane.gmane.org ([80.91.229.3]:46998) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1arsMj-0001ml-Kz for emacs-orgmode@gnu.org; Sun, 17 Apr 2016 15:28:19 -0400 Received: from list by plane.gmane.org with local (Exim 4.69) (envelope-from ) id 1arsMh-00017N-Nv for emacs-orgmode@gnu.org; Sun, 17 Apr 2016 21:28:15 +0200 Received: from friends.grml.info ([136.243.234.19]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Sun, 17 Apr 2016 21:28:15 +0200 Received: from news1142 by friends.grml.info with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Sun, 17 Apr 2016 21:28:15 +0200 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: "Emacs-orgmode" To: emacs-orgmode@gnu.org * Antoine R. Dumont wrote: > > Also, for information you could use format function. > It clarifies the prompt computation ^^: > > ``` > (defun org-read-entry-property-name () > "Read a property name from the current entry." > (let ((completion-ignore-case t) > (default-prop (or (and (org-at-property-p) > (org-match-string-no-properties 2)) > org-last-set-property))) > (org-completing-read > (format "Property [%s]: " (if default-prop default-prop "")) > (org-entry-properties nil nil) > nil nil nil nil default-prop))) > ``` Thank you very much! Nice code, eases my life. -- mail|git|SVN|photos|postings|SMS|phonecalls|RSS|CSV|XML to Org-mode: > get Memacs from https://github.com/novoid/Memacs < https://github.com/novoid/extract_pdf_annotations_to_orgmode + more on github