diff options
author | V3n3RiX <venerix@redcorelinux.org> | 2019-09-08 01:07:24 +0100 |
---|---|---|
committer | V3n3RiX <venerix@redcorelinux.org> | 2019-09-08 01:07:24 +0100 |
commit | e3cf2c86fca1750343c1885311f857f185ee4f2d (patch) | |
tree | d9d1fbc20509d4c90f57fb2d9e1459bc8034c831 /app-emacs/mediawiki/files | |
parent | f1af93971b7490792d8541bc790e0d8c6d787059 (diff) |
gentoo resync : 08.09.2019
Diffstat (limited to 'app-emacs/mediawiki/files')
-rw-r--r-- | app-emacs/mediawiki/files/50mediawiki-gentoo-2.2.9.el | 11 | ||||
-rw-r--r-- | app-emacs/mediawiki/files/mediawiki-2.2.9-user-agent.patch | 25 |
2 files changed, 36 insertions, 0 deletions
diff --git a/app-emacs/mediawiki/files/50mediawiki-gentoo-2.2.9.el b/app-emacs/mediawiki/files/50mediawiki-gentoo-2.2.9.el new file mode 100644 index 000000000000..cc9c5b714fb3 --- /dev/null +++ b/app-emacs/mediawiki/files/50mediawiki-gentoo-2.2.9.el @@ -0,0 +1,11 @@ +(add-to-list 'load-path "@SITELISP@") +(autoload 'mediawiki-open "mediawiki" + "Open a wiki page specified by NAME from the mediawiki engine" t) +(autoload 'mediawiki-site "mediawiki" + "Set up mediawiki.el for a site." t) +(eval-after-load "mediawiki" + '(add-to-list + 'mediawiki-site-alist + '("Gentoo" "https://wiki.gentoo.org/" "" "" nil "Main Page") + nil + (lambda (a b) (equal (car a) (car b))))) diff --git a/app-emacs/mediawiki/files/mediawiki-2.2.9-user-agent.patch b/app-emacs/mediawiki/files/mediawiki-2.2.9-user-agent.patch new file mode 100644 index 000000000000..2d64e410b9e0 --- /dev/null +++ b/app-emacs/mediawiki/files/mediawiki-2.2.9-user-agent.patch @@ -0,0 +1,25 @@ +Fix "(wrong-type-argument stringp default)" in url-compat-retrieve. +https://github.com/hexmode/mediawiki-el/issues/27 + +--- mediawiki-el-2.2.9-orig/mediawiki.el ++++ mediawiki-el-2.2.9/mediawiki.el +@@ -414,10 +414,15 @@ + POST-PROCESS is the function to call for post-processing. + BUFFER is the buffer to store the result in. CALLBACK will be + called in BUFFER with CBARGS, if given." +- (let ((url-user-agent (concat (string-trim (if (functionp url-user-agent) +- (funcall url-user-agent) +- url-user-agent)) +- " mediawiki.el " mediawiki-version "\r\n"))) ++ (let ((url-user-agent ++ (if (eq url-user-agent 'default) ++ 'default ++ (concat (string-trim (if (functionp url-user-agent) ++ (funcall url-user-agent) ++ url-user-agent)) ++ " mediawiki.el " mediawiki-version "\r\n"))) ++ (url-package-name "mediawiki.el") ++ (url-package-version mediawiki-version)) + (cond ((boundp 'url-be-asynchronous) ; Sniff w3 lib capability + (if callback + (setq url-be-asynchronous t) |