diff options
author | Mamoru Komachi <usata@gentoo.org> | 2004-02-01 05:30:25 +0000 |
---|---|---|
committer | Mamoru Komachi <usata@gentoo.org> | 2004-02-01 05:30:25 +0000 |
commit | a216ac8d19cfc019211dd3aed5148b992fd52200 (patch) | |
tree | c909ba1df06c69ef4ef6fce6e1c65ca4af6888a5 /app-emacs/emacs-w3m/files | |
parent | Added a patch to complete http:// if no scheme is specified (diff) | |
download | gentoo-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-r2 | 1 | ||||
-rw-r--r-- | app-emacs/emacs-w3m/files/emacs-w3m-1.3.80-gentoo.diff | 28 |
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: |