summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMamoru Komachi <usata@gentoo.org>2004-02-01 05:30:25 +0000
committerMamoru Komachi <usata@gentoo.org>2004-02-01 05:30:25 +0000
commita216ac8d19cfc019211dd3aed5148b992fd52200 (patch)
treec909ba1df06c69ef4ef6fce6e1c65ca4af6888a5 /app-emacs/emacs-w3m/files
parentAdded a patch to complete http:// if no scheme is specified (diff)
downloadgentoo-2-a216ac8d19cfc019211dd3aed5148b992fd52200.tar.gz
gentoo-2-a216ac8d19cfc019211dd3aed5148b992fd52200.tar.bz2
gentoo-2-a216ac8d19cfc019211dd3aed5148b992fd52200.zip
Added a patch to complete http:// if no scheme is specified
Diffstat (limited to 'app-emacs/emacs-w3m/files')
-rw-r--r--app-emacs/emacs-w3m/files/digest-emacs-w3m-1.3.80-r21
-rw-r--r--app-emacs/emacs-w3m/files/emacs-w3m-1.3.80-gentoo.diff28
2 files changed, 29 insertions, 0 deletions
diff --git a/app-emacs/emacs-w3m/files/digest-emacs-w3m-1.3.80-r2 b/app-emacs/emacs-w3m/files/digest-emacs-w3m-1.3.80-r2
new file mode 100644
index 000000000000..71d85d8b7cb1
--- /dev/null
+++ b/app-emacs/emacs-w3m/files/digest-emacs-w3m-1.3.80-r2
@@ -0,0 +1 @@
+MD5 c62719ea64fbe44d4fc80d442035c091 emacs-w3m-1.3.80.tar.gz 681083
diff --git a/app-emacs/emacs-w3m/files/emacs-w3m-1.3.80-gentoo.diff b/app-emacs/emacs-w3m/files/emacs-w3m-1.3.80-gentoo.diff
new file mode 100644
index 000000000000..5d56329e7bd0
--- /dev/null
+++ b/app-emacs/emacs-w3m/files/emacs-w3m-1.3.80-gentoo.diff
@@ -0,0 +1,28 @@
+Index: w3m.el
+===================================================================
+RCS file: /storage/cvsroot/emacs-w3m/w3m.el,v
+retrieving revision 1.980
+retrieving revision 1.981
+diff -u -r1.980 -r1.981
+--- w3m.el 18 Jan 2004 14:36:43 -0000 1.980
++++ w3m.el 22 Jan 2004 08:00:20 -0000 1.981
+@@ -3409,12 +3409,17 @@
+ "URL: "))
+ 'w3m-url-completion nil nil initial
+ 'w3m-input-url-history)))
+- (if (string= "" url) (setq url default))
++ (when (string= "" url)
++ (setq url default))
+ ;; remove duplication
+ (when (stringp url)
+ (setq w3m-input-url-history
+ (cons url (delete url w3m-input-url-history))))
+- url)))
++ ;; The return value of this function must contain a scheme part.
++ (if (and (string-match w3m-url-components-regexp url)
++ (match-beginning 1))
++ url
++ (concat "http://" url)))))
+
+
+ ;;; Cache: