diff options
author | Tom Willemse | 2013-05-31 20:10:20 +0200 |
---|---|---|
committer | Tom Willemse | 2013-06-01 00:16:04 +0200 |
commit | c2bff71b961d11fe9c44c5c2dc7c6c761d472eff (patch) | |
tree | 7a51d42d4e09514655e1088fadc7f87e48631d2f /emacs/init.org | |
parent | 6fba1713f8454d5af8a6ca3b4a3119be17213fc2 (diff) | |
download | dotfiles-c2bff71b961d11fe9c44c5c2dc7c6c761d472eff.tar.gz dotfiles-c2bff71b961d11fe9c44c5c2dc7c6c761d472eff.zip |
Move the last parts of ext.el into init
Diffstat (limited to 'emacs/init.org')
-rw-r--r-- | emacs/init.org | 41 |
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) |