summaryrefslogtreecommitdiffstats
path: root/emacs/init.org
diff options
context:
space:
mode:
Diffstat (limited to 'emacs/init.org')
-rw-r--r--emacs/init.org41
1 files changed, 36 insertions, 5 deletions
diff --git a/emacs/init.org b/emacs/init.org
index bd4b1d8..11b2dca 100644
--- a/emacs/init.org
+++ b/emacs/init.org
@@ -70,12 +70,9 @@
* Load other functions
Including all the functions being used here would make this file
- immens and perhaps also somewhat unclear. In any case there are a
- number of functions that I have found on the web in ~ext.el~, and a
- number that I have written myself in ~oni.el~. So load them.
+ immense and perhaps also somewhat unclear.
#+BEGIN_SRC emacs-lisp
- (require 'ext)
(require 'oni)
#+END_SRC
@@ -809,6 +806,13 @@
The emacsredux website had an interesting [[http://emacsredux.com/blog/2013/03/28/indent-defun/][tip]].
#+BEGIN_SRC emacs-lisp
+ (defun ext:indent-defun ()
+ "Indent the current defun."
+ (interactive)
+ (save-excursion
+ (mark-defun)
+ (indent-region (region-beginning) (region-end))))
+
(global-set-key (kbd "C-M-z") 'ext:indent-defun)
#+END_SRC
@@ -1477,6 +1481,34 @@
(setq org-special-ctrl-a/e t)
#+END_SRC
+* org :org:
+
+** Add appointments to the agenda file
+
+ Every time the agenda is generated will add the appropriate
+ appointments to the =appt= system.
+
+ #+BEGIN_SRC emacs-lisp
+ (defadvice org-agenda-redo (after ext:org-agenda-redo-add-appts)
+ "Pressing `r' on the agenda will also add appointments."
+ (progn
+ (setq appt-time-msg-list nil)
+ (org-agenda-to-appt)))
+ #+END_SRC
+
+* Reload current buffer
+
+ Use =<f5>= to reload the current buffer.
+
+ #+BEGIN_SRC emacs-lisp
+ (defun ext:reload-buffer ()
+ "Reload current buffer."
+ (interactive)
+ (revert-buffer nil t nil))
+
+ (global-set-key (kbd "<f5>") 'ext:reload-buffer)
+ #+END_SRC
+
* All the rest
This still needs to be sorted out and documented, haven't had time
@@ -1550,7 +1582,6 @@
(global-set-key (kbd "<XF86HomePage>") 'oni:raise-scratch)
(global-set-key (kbd "<XF86Mail>") 'gnus)
(global-set-key (kbd "<f10>") 'git-project-show-files)
- (global-set-key (kbd "<f5>") 'ext:reload-buffer)
(global-set-key (kbd "<f6>") 'jabber-switch-to-roster-buffer)
(global-set-key (kbd "<f7>") 'magit-status)
(global-set-key (kbd "<hiragana>") 'oni:show-org-index)