Store link: Capture description for ID links.

Creating links with org-store-link in org files did not capture the
link description (the headline).  Fixed with this patch.  Report by
F.D. Friedrichs.

lisp/ChangeLog

@@ -1,5 +1,8 @@
 2008-12-19  Carsten Dominik  <carsten.dominik@gmail.com>
 
+	* org.el (org-store-link): Capture link description from
+	`org-id-store-link'.
+
 	* org-exp.el (org-export-html-format-image): Add the / to the end
 	of the <img> tag.
 	(org-export-format-source-code): Surround example by empty lines,

lisp/org.el

@@ -6270,7 +6270,9 @@ For file links, arg negates `org-context-in-file-links'."
 			(error nil)))))
 	;; We can make a link using the ID.
 	(setq link (condition-case nil
-		       (org-id-store-link)
+		       (prog1 (org-id-store-link)
+			 (setq desc (plist-get org-store-link-plist
+					       :description)))
 		     (error
 		      ;; probably before first headline, link to file only
 		      (concat "file:"