|
@@ -9946,8 +9946,8 @@ Note: this function also decodes single byte encodings like
|
|
|
|
|
|
(defun org-link-prettify (link)
|
|
(defun org-link-prettify (link)
|
|
"Return a human-readable representation of LINK.
|
|
"Return a human-readable representation of LINK.
|
|
-The car of LINK must be a raw link the cdr of LINK must be either
|
|
+The car of LINK must be a raw link.
|
|
-a link description or nil."
|
|
+The cdr of LINK must be either a link description or nil."
|
|
(let ((desc (or (cadr link) "<no description>")))
|
|
(let ((desc (or (cadr link) "<no description>")))
|
|
(concat (format "%-45s" (substring desc 0 (min (length desc) 40)))
|
|
(concat (format "%-45s" (substring desc 0 (min (length desc) 40)))
|
|
"<" (car link) ">")))
|
|
"<" (car link) ">")))
|