[gnus git] branch master updated: n0-15-80-g4b70902 =1= * shr.el (shr-expand-url): Protect against null urls.

       via  4b70902e68d19c4144ebabe7e2e33b11f7159099 (commit)
      from  5627fc94bf5c729eabff96cfddac7ff24515822c (commit)


- Log -----------------------------------------------------------------
commit 4b70902e68d19c4144ebabe7e2e33b11f7159099
Author: Lars Magne Ingebrigtsen <[email protected]>
Date:   Thu Apr 21 03:58:12 2011 +0200

    * shr.el (shr-expand-url): Protect against null urls.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f67f77b..f6c19d5 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2011-04-21  Lars Magne Ingebrigtsen  <[email protected]>
+
+	* shr.el (shr-expand-url): Protect against null urls.
+
 2011-04-20  Lars Magne Ingebrigtsen  <[email protected]>
 
 	* shr.el (shr-base): New binding.
diff --git a/lisp/shr.el b/lisp/shr.el
index f27705e..ee231e6 100644
--- a/lisp/shr.el
+++ b/lisp/shr.el
@@ -397,7 +397,8 @@ redirects somewhere else."
 (defun shr-expand-url (url)
   (cond
    ;; Absolute URL.
-   ((or (string-match "\\`[a-z]*:" url)
+   ((or (not url)
+	(string-match "\\`[a-z]*:" url)
 	(not shr-base))
     url)
    ((and (not (string-match "/\\'" shr-base))

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog |    4 ++++
 lisp/shr.el    |    3 ++-
 2 files changed, 6 insertions(+), 1 deletions(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project