From mboxrd@z Thu Jan 1 00:00:00 1970 From: Richard Riley Subject: [PATCH] tag input separators Date: Mon, 04 Oct 2010 11:44:44 +0200 Message-ID: Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from [140.186.70.92] (port=55862 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1P2hbd-0006D0-Ey for emacs-orgmode@gnu.org; Mon, 04 Oct 2010 05:45:16 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1P2hbR-0002IH-Te for emacs-orgmode@gnu.org; Mon, 04 Oct 2010 05:45:03 -0400 Received: from lo.gmane.org ([80.91.229.12]:54436) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1P2hbR-0002Hb-J2 for emacs-orgmode@gnu.org; Mon, 04 Oct 2010 05:45:01 -0400 Received: from list by lo.gmane.org with local (Exim 4.69) (envelope-from ) id 1P2hbM-0005jo-KE for emacs-orgmode@gnu.org; Mon, 04 Oct 2010 11:44:56 +0200 Received: from 85.183.18.158 ([85.183.18.158]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 04 Oct 2010 11:44:56 +0200 Received: from rileyrg by 85.183.18.158 with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 04 Oct 2010 11:44:56 +0200 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: emacs-orgmode@gnu.org I dont know if it would be generally useful, but a tiny little tweak to tag editing in order to allow "," as a seperator when typing in tags via C-c C-q TAB "free entry" interface. "," is certainly easier for me to use but I dont know about the ramifications of it as a legal character in a tag name. --8<---------------cut here---------------start------------->8--- Modified lisp/org.el diff --git a/lisp/org.el b/lisp/org.el index 3f24ee8..fa3d364 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -12792,6 +12792,8 @@ With prefix ARG, realign all tags in headings in the current buffer." ;; No boolean logic, just a list (setq tags (replace-match ":" t t tags)))) + (setq tags (replace-regexp-in-string "[ ,]" ":" tags)) + (if org-tags-sort-function (setq tags (mapconcat 'identity (sort (org-split-string tags (org-re "[^[:alnum:]_@#%]+")) --8<---------------cut here---------------end--------------->8--- I replaced space too but that isnt currently allowed anyway. regards r.