andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

shr.el (shr-urlify, shr-link): Still broken but at least doesn't error out because the face is not a list.

Browse source
This commit is contained in:
Teodor Zlatanov 2011-05-05 22:12:41 +00:00 • committed by Katsumi Yamaoka
parent db7a0b4f1d
commit df26ce09c4
2 changed files with 7 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/gnus/ChangeLog
View file

@ -1,3 +1,8 @@
2011-05-05 Teodor Zlatanov <tzz@lifelogs.com>
* shr.el (shr-urlify, shr-link): Still broken but at least doesn't
error out because the face is not a list.
2011-05-05 Glenn Morris <rgm@gnu.org>
* gnus-start.el (gnus-propagate-marks): Declare.

4
lisp/gnus/shr.el
View file

@ -94,7 +94,7 @@ cid: URL as the argument.")
(defface shr-link '((t (:underline t)
(:foreground "yellow")
(:background "black")))
"Font for <s> elements."
"Font for link elements."
:group 'shr)
;;; Internal variables.
@ -597,7 +597,7 @@ START, and END. Note that START and END should be merkers."
:help-echo (if title (format "%s (%s)" url title) url)
:keymap shr-map
url)
(put-text-property start (point) 'face 'shr-link)
(put-text-property start (point) 'face '(shr-link))
(put-text-property start (point) 'shr-url url))
(defun shr-encode-url (url)