Procházet zdrojové kódy

Merge branch 't/patch568'

Bastien Guerry před 14 roky
rodič
revize
e6f51d2485
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  1. 1 1
      lisp/org.el

+ 1 - 1
lisp/org.el

@@ -8185,7 +8185,7 @@ call CMD."
 
 (defun org-link-expand-abbrev (link)
   "Apply replacements as defined in `org-link-abbrev-alist."
-  (if (string-match "^\\([a-zA-Z][-_a-zA-Z0-9]*\\)\\(::?\\(.*\\)\\)?$" link)
+  (if (string-match "^\\([^:]*\\)\\(::?\\(.*\\)\\)?$" link)
       (let* ((key (match-string 1 link))
 	     (as (or (assoc key org-link-abbrev-alist-local)
 		     (assoc key org-link-abbrev-alist)))