[O] [patch] correct link following

[Daniel Clemente]

Hi, I sent this patch 1 month ago but it wasn't included in org. I still need 
it for link following to work, otherwise I get:

Debugger entered--Lisp error: (wrong-type-argument stringp nil)
  string-match("^id:" nil)
  org-open-at-point(nil)
  call-interactively(org-open-at-point nil nil)
  command-execute(org-open-at-point)


  I remember seeing another bug report on this list providing the same solution.

Thanks.


diff --git a/lisp/org.el b/lisp/org.el
index c42b9eb..01b39be 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -10517,7 +10517,8 @@ application the system uses for this file type."
           ((and (string= type "thisfile")
                 (or (run-hook-with-args-until-success
                      'org-open-link-functions path)
-                    (and (string-match "^id:" link)
+                    (and link
+                         (string-match "^id:" link)
                          (or (featurep 'org-id) (require 'org-id))
                          (progn
                            (funcall (nth 1 (assoc "id" org-link-protocols))