aboutsummaryrefslogtreecommitdiff
path: root/emacs
diff options
context:
space:
mode:
Diffstat (limited to 'emacs')
-rw-r--r--emacs/.emacs.d/init/ycp-org.el1
-rw-r--r--emacs/.emacs.d/init/ycp-web.el9
m---------emacs/.emacs.d/lisp/exitter0
-rw-r--r--emacs/.emacs.d/lisp/my/my-org.el6
4 files changed, 16 insertions, 0 deletions
diff --git a/emacs/.emacs.d/init/ycp-org.el b/emacs/.emacs.d/init/ycp-org.el
index 430335a..eb5a63d 100644
--- a/emacs/.emacs.d/init/ycp-org.el
+++ b/emacs/.emacs.d/init/ycp-org.el
@@ -498,6 +498,7 @@
(advice-add 'org-insert-structure-template :after 'my-org-edit-special)
(advice-add 'org-edit-src-exit :before 'my-org-edit-src-before-exit)
(advice-add 'org-edit-src-exit :after 'my-org-edit-src-after-exit)
+ (advice-add 'org-edit-special :after 'my-org-edit-special-after)
(my-setq-from-local my-org-task-categories))
(my-package my-org
diff --git a/emacs/.emacs.d/init/ycp-web.el b/emacs/.emacs.d/init/ycp-web.el
index d188afd..7521afd 100644
--- a/emacs/.emacs.d/init/ycp-web.el
+++ b/emacs/.emacs.d/init/ycp-web.el
@@ -325,4 +325,13 @@
)
(require 'w3m-load))
+(my-package exitter
+ (:delay 60)
+ (my-setq-from-local
+ exitter-oauth-consumer-key exitter-oauth-consumer-secret
+ exitter-access-token exitter-username exitter-password exitter-email
+ exitter-oauth-token exitter-oauth-token-secret exitter-oauth-token-ctime)
+ (setq exitter-debug t)
+ )
+
(provide 'ycp-web)
diff --git a/emacs/.emacs.d/lisp/exitter b/emacs/.emacs.d/lisp/exitter
new file mode 160000
+Subproject 2a528e8643612ece0561b2e30a63e63e0782c93
diff --git a/emacs/.emacs.d/lisp/my/my-org.el b/emacs/.emacs.d/lisp/my/my-org.el
index 4fea460..698b0d3 100644
--- a/emacs/.emacs.d/lisp/my/my-org.el
+++ b/emacs/.emacs.d/lisp/my/my-org.el
@@ -1364,6 +1364,12 @@ With a prefix arg, yank and exit immediately."
(yank))
(org-edit-src-exit))))
+;; used to add an :after advice to `org-edit-special'.
+(defun my-org-edit-special-after (_)
+ ;; some modes (e.g. diff mode) are read-only by default, which
+ ;; does not make sense when the intention is to edit
+ (read-only-mode 0))
+
(defun my-link-to-line-number-in-prog-mode ()
"When in prog-mode, use line number as search item."
(when (derived-mode-p 'prog-mode)