Add attributes also to mailto and ftp links.

lisp/ChangeLog

@@ -1,5 +1,8 @@
 2008-07-24  Carsten Dominik  <dominik@science.uva.nl>
 
+	* org-exp.el (org-export-as-html): Add attributes also in mailto
+	and ftp links.
+
 	* org.el (org-autoload): Add `org-dblock-write:columnview'.
 
 
@@ -7,7 +10,7 @@
 
 
 
-	
+
 
 2008-07-23  Carsten Dominik  <dominik@science.uva.nl>
 

lisp/org-exp.el

@@ -3072,7 +3072,7 @@ lang=\"%s\" xml:lang=\"%s\">
 	     ((member type '("ftp" "mailto" "news"))
 	      ;; standard URL
 	      (setq link (concat type ":" path))
-	      (setq rpl (concat "<a href=\"" link "\">" desc "</a>")))
+	      (setq rpl (concat "<a href=\"" link "\"" attr ">" desc "</a>")))
 
 	     ((functionp (setq fnc (nth 2 (assoc type org-link-protocols))))
 	      ;; The link protocol has a function for format the link