Browse Source

Merge branch 'improve-org-eww' into maint

Marco Wahl 8 years ago
parent
commit
b5b44f918d
1 changed files with 6 additions and 3 deletions
  1. 6 3
      lisp/org-eww.el

+ 6 - 3
lisp/org-eww.el

@@ -138,9 +138,12 @@ the structure of the Org file."
 		     (point)
 		     (org-eww-goto-next-url-property-change)))
               ;; concat `org-mode' style url to `return-content'.
-              (setq return-content (concat return-content
-                                           (org-make-link-string
-                                            link-location link-title))))
+	      (setq return-content
+		    (concat return-content
+			    (if (stringp link-location)
+				;; hint: link-location is different for form-elements.
+				(org-make-link-string link-location link-title)
+			      link-title))))
 	  (goto-char temp-position) ; reset point before jump next anchor
 	  (setq out-bound t)	    ; for break out `while' loop
 	  ))