tec/org-mode
tec/org-mode
1
0
Fork 0
forked from mirrors/org-mode
Code Pull requests Releases Activity

Fix bug in org-pcomplete.el.

Browse source 
* org-pcomplete.el (org-thing-at-point): Also match line
options like LATEX_CLASS when pcompleting from LATEX_.
This commit is contained in:
Bastien Guerry 2012-04-10 23:37:12 +02:00
parent bfe8ec1fce
commit dbd8745c29
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/org-pcomplete.el
View file

@ -69,7 +69,7 @@ The return value is a string naming the thing at point."
(re-search-backward "^[ \t]*#\\+\\([A-Z_]+\\):.*" (re-search-backward "^[ \t]*#\\+\\([A-Z_]+\\):.*"
(line-beginning-position) t)) (line-beginning-position) t))
(cons "file-option" (match-string-no-properties 1))) (cons "file-option" (match-string-no-properties 1)))
((string-match "\\`[ \t]*#\\+[a-zA-Z]*\\'" line-to-here) ((string-match "\\`[ \t]*#\\+[a-zA-Z_]*\\'" line-to-here)
(cons "file-option" nil)) (cons "file-option" nil))
((equal (char-before beg) ?\[) ((equal (char-before beg) ?\[)
(cons "link" nil)) (cons "link" nil))