summaryrefslogtreecommitdiffhomepage
path: root/custom
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2022-08-06 20:17:20 +0100
committerjao <jao@gnu.org>2022-08-06 20:17:20 +0100
commitb889be5a91b968d8364152e6691d5b08757fefe9 (patch)
treee6928ef8b8c48748b3ac3bf83f2f7aec2770703f /custom
parent60a3242c244766bedba491e1fc1365c4188aa132 (diff)
downloadelibs-b889be5a91b968d8364152e6691d5b08757fefe9.tar.gz
elibs-b889be5a91b968d8364152e6691d5b08757fefe9.tar.bz2
nits
Diffstat (limited to 'custom')
-rw-r--r--custom/jao-custom-blog.el3
-rw-r--r--custom/jao-custom-email.el19
-rw-r--r--custom/jao-custom-eww.el8
-rw-r--r--custom/jao-custom-org.el4
4 files changed, 10 insertions, 24 deletions
diff --git a/custom/jao-custom-blog.el b/custom/jao-custom-blog.el
index 3014cb5..201aed6 100644
--- a/custom/jao-custom-blog.el
+++ b/custom/jao-custom-blog.el
@@ -147,8 +147,7 @@
(mapconcat #'identity tags " ")
"\n\n")
(when (member "books" tags)
- (insert jao-org-static-blog--prev-beg
- "\n\n[[https://jao.io/img/" file ".jpg]]\n\n"))
+ (insert jao-org-static-blog--prev-beg "\n\n[[../img/" file ".jpg]]\n\n"))
(save-excursion (insert jao-org-static-blog--prev-end "\n"))))
;;; Drafts
diff --git a/custom/jao-custom-email.el b/custom/jao-custom-email.el
index a7fc8e0..e8aa863 100644
--- a/custom/jao-custom-email.el
+++ b/custom/jao-custom-email.el
@@ -215,25 +215,6 @@
(jao-sendmail-local)
-;;; multipart html renderer
-(defun jao-w3m-html-renderer (handle)
- (let ((w3m-message-silent t)
- (mm-w3m-safe-url-regexp nil))
- (condition-case nil
- (mm-inline-text-html-render-with-w3m handle)
- (error (delete-region (point) (point-max))
- (let ((shr-use-fonts nil)
- (shr-use-colors nil))
- (mm-shr handle))))))
-
-(defun jao-shr-html-renderer (handle)
- (let ((fill-column nil)
- (shr-width fill-column))
- (mm-shr handle)))
-
-;; (setq mm-text-html-renderer #'jao-w3m-html-renderer)
-(setq mm-text-html-renderer #'jao-shr-html-renderer)
-
;;; bbdb
(use-package bbdb
:ensure t
diff --git a/custom/jao-custom-eww.el b/custom/jao-custom-eww.el
index 6902285..dc643fb 100644
--- a/custom/jao-custom-eww.el
+++ b/custom/jao-custom-eww.el
@@ -20,6 +20,14 @@
(setq jao-browse-url-function #'jao-eww-browse-url)
(setq eww-use-browse-url "^\\(gemini\\|gopher\\):")
+;;; multipart html renderer
+(defun jao-shr-html-renderer (handle)
+ (let ((fill-column nil)
+ (shr-width fill-column))
+ (mm-shr handle)))
+
+(setq mm-text-html-renderer #'jao-shr-html-renderer)
+
;;; Opening URLs
(defun jao-eww-copy-link ()
(interactive)
diff --git a/custom/jao-custom-org.el b/custom/jao-custom-org.el
index 6b4200e..1c6076a 100644
--- a/custom/jao-custom-org.el
+++ b/custom/jao-custom-org.el
@@ -12,8 +12,8 @@
org-complete-tags-always-offer-all-agenda-tags t
org-cycle-separator-lines 0 ;; no blank lines when all colapsed
org-deadline-warning-days 14
- org-default-notes-file (expand-file-name "inbox.org" org-directory)
org-directory jao-org-dir
+ org-default-notes-file (expand-file-name "inbox.org" org-directory)
org-display-remote-inline-images 'download ;; 'skip 'cache
org-ellipsis " .." ;; ↴
org-email-link-description-format "Email %c: %s"
@@ -148,8 +148,6 @@
(setq org-src-window-setup 'other-window) ;; current-window
(require 'org-tempo nil t) ;; <s TAB for 9.2 and later
-;; (use-package poly-org :ensure t)
-
(use-package ob-prolog
:ensure t
:after org)