summaryrefslogtreecommitdiffhomepage
path: root/custom
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2022-08-13 19:45:50 +0100
committerjao <jao@gnu.org>2022-08-13 19:45:50 +0100
commit98e34ab0fa5e460da866d37ecccb66d8ebd75321 (patch)
tree4c18127544cde76491f29826a6c26bee8284e1b4 /custom
parent2e5cd6256d0dba3e57d433f5d873ab961a50a343 (diff)
downloadelibs-98e34ab0fa5e460da866d37ecccb66d8ebd75321.tar.gz
elibs-98e34ab0fa5e460da866d37ecccb66d8ebd75321.tar.bz2
emacs-w3m compatibility
Diffstat (limited to 'custom')
-rw-r--r--custom/jao-custom-w3m.el8
1 files changed, 5 insertions, 3 deletions
diff --git a/custom/jao-custom-w3m.el b/custom/jao-custom-w3m.el
index 634d21e..51272ca 100644
--- a/custom/jao-custom-w3m.el
+++ b/custom/jao-custom-w3m.el
@@ -27,13 +27,14 @@
(let ((w3m-message-silent t)
(w3m-fill-column 120)
(mm-w3m-safe-url-regexp nil))
- (condition-case nil
+ (condition-case e
(mm-inline-text-html-render-with-w3m handle)
- (error (delete-region (point) (point-max))
+ (error (message "Error rendering page with w3m: %s" e)
+ (delete-region (point) (point-max))
(let ((shr-use-fonts nil))
(mm-shr handle))))))
-(setq mm-text-html-renderer #'jao-w3m-html-renderer)
+(setq mm-text-html-renderer 'jao-w3m-html-renderer)
;;; org integration
(defun jao-w3m-get-link ()
@@ -102,6 +103,7 @@
;;; package
(use-package w3m
:ensure t
+ :demand t
:custom ((w3m-key-binding 'info)
(w3m-display-mode 'dual-pane))
:init