* net/shr.el (shr-browse-url): Fix interactive spec.
This commit is contained in:
parent
71d4c19d3d
commit
5196f88a95
2 changed files with 3 additions and 1 deletions
|
@ -1,5 +1,7 @@
|
|||
2013-06-24 Ivan Kanis <ivan@kanis.fr>
|
||||
|
||||
* net/shr.el (shr-browse-url): Fix interactive spec.
|
||||
|
||||
* net/eww.el (eww): Add a trailing slash to domain names.
|
||||
|
||||
2013-06-24 Juanma Barranquero <lekktu@gmail.com>
|
||||
|
|
|
@ -648,7 +648,7 @@ size, and full-buffer size."
|
|||
(defun shr-browse-url (&optional external)
|
||||
"Browse the URL under point.
|
||||
If EXTERNAL, browse the URL using `shr-external-browser'."
|
||||
(interactive "p")
|
||||
(interactive "P")
|
||||
(let ((url (get-text-property (point) 'shr-url)))
|
||||
(cond
|
||||
((not url)
|
||||
|
|
Loading…
Add table
Reference in a new issue