diff options
Diffstat (limited to 'emacs/.emacs.d/init/oni-shr-init.org')
-rw-r--r-- | emacs/.emacs.d/init/oni-shr-init.org | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/emacs/.emacs.d/init/oni-shr-init.org b/emacs/.emacs.d/init/oni-shr-init.org deleted file mode 100644 index 3aa8626..0000000 --- a/emacs/.emacs.d/init/oni-shr-init.org +++ /dev/null @@ -1,28 +0,0 @@ -#+TITLE: shr configuration - -#+BEGIN_SRC emacs-lisp - (require 'shr) -#+END_SRC - -* Remove background colors - - Define a procedure that removes the last argument it gets if there - are more than 3. - - #+BEGIN_SRC emacs-lisp - (defun oni:shr-colorize-remove-last-arg (args) - "If ARGS has more than 3 items, remove the last one." - (if (> (length args) 3) - (butlast args) - args)) - #+END_SRC - - Add the function as a filter-args advice to - =shr-colorize-region=. The last (fourth) argument to that function - is the background color to use, it's optional, so removing it - effectively stops shr from adding background colors. - - #+BEGIN_SRC emacs-lisp - (advice-add #'shr-colorize-region :filter-args - #'oni:shr-colorize-remove-last-arg) - #+END_SRC |