[ORG MODE] Tiny patch

[ORG MODE] Tiny patch

[Xavier Maillard]

Hello,

Here you can find a very tiny patch that allow one to have '@' character as a
candidate for tags in org-mode.

As I use those tags, I found it particulary useful to add support for them.

Here it is:

===File /tmp/org.el.diff====================================
--- org.el.orig	2006-02-15 23:17:37.000000000 +0100
+++ org.el	2006-02-15 23:18:34.000000000 +0100
@@ -6298,7 +6298,7 @@
 		     (mapconcat 'regexp-quote
 				(nreverse (cdr (reverse org-todo-keywords)))
 				"\\|")
-		     "\\>\\)\\)? *\\(.*?\\)\\(:[A-Za-z_:]+:\\)?[ \t]*[\n\r]"))
+		     "\\>\\)\\)? *\\(.*?\\)\\(:[A-Za-z_@:]+:\\)?[ \t]*[\n\r]"))
 	 (props (list 'face nil
 		      'done-face 'org-done
 		      'undone-face nil
@@ -6386,7 +6386,7 @@
   (let ((match0 match) minus tag mm matcher orterms term orlist)
     (setq orterms (org-split-string match "|"))
     (while (setq term (pop orterms))
-      (while (string-match "^&?\\([-+:]\\)?\\([A-Za-z_]+\\)" term)
+      (while (string-match "^&?\\([-+:]\\)?\\([A-Za-z_@]+\\)" term)
 	(setq minus (and (match-end 1)
 			 (equal (match-string 1 term) "-"))
 	      tag (match-string 2 term)
============================================================

And something that looks like a changelog entry:

2006-02-15  Xavier Maillard  <zedek@gnu.org>

  * org.el (org-scan-tags, org-make-tags-matcher): Add '@' character as part
    of an Org tag.

Regard,

Xavier Maillard