From 7713dfa53a216ad1559aadcc5a93d3e3ba642527 Mon Sep 17 00:00:00 2001 From: Tom Willemsen Date: Wed, 17 Oct 2012 09:04:54 +0200 Subject: .emacs.d/init.el --- .emacs.d/init.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to '.emacs.d/init.el') diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 4f78780..41e2702 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -393,7 +393,7 @@ (global-set-key (kbd "C-c c") 'org-capture) (global-set-key (kbd "C-c i p") 'identica-update-status-interactive) (global-set-key (kbd "C-c p") 'oni:show-buffer-position) -(global-set-key (kbd "C-c t") 'ansi-term) +(global-set-key (kbd "C-c t") 'oni:raise-ansi-term) (global-set-key (kbd "C-d") 'oni:kill-region-or-forward-char) (global-set-key (kbd "C-e") 'oni:move-end-of-dwim) (global-set-key (kbd "C-k") 'oni:kill-region-or-line) -- cgit v1.2.3-54-g00ecf From cd7d50812014f4a331d6053ea6025e045ac82e33 Mon Sep 17 00:00:00 2001 From: Tom Willemsen Date: Fri, 19 Oct 2012 13:29:34 +0200 Subject: .emacs.d/init.el --- .emacs.d/init.el | 44 +++++++++++++++++++++++++++++++++++--------- 1 file changed, 35 insertions(+), 9 deletions(-) (limited to '.emacs.d/init.el') diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 41e2702..c3d687c 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -178,20 +178,44 @@ (setq flymake-gui-warnings-enabled nil) (setq flymake-info-line-regexp (eval-when-compile - (regexp-opt '("Invalid name" - "Missing docstring" - "multiple imports on one line" - "expected 2 blank lines, found 1" - "TODO:")))) + (regexp-opt + '("Invalid name" + "String statement has no effect" + "Missing docstring" + "Empty docstring" + "multiple imports on one line" + "expected 2 blank lines, found 1" + "TODO:" + "whitespace after '{'" + "whitespace before '}'" + "whitespace before ':'" + "whitespace after '('" + "whitespace before ')'" + "the backslash is redundant between brackets" + "continuation line over-indented for visual indent" + "continuation line under-indented for visual indent" + "Too many statements" + "comparison to None should be" + "missing whitespace around operator" + "missing whitespace after ','" + "line too long" + "at least two spaces before inline comment" + "trailing whitespace")))) (setq flymake-log-file-name (expand-file-name "~/.emacs.d/flymake.log")) (setq flymake-log-level 0) (setq flymake-warn-line-regexp (eval-when-compile (regexp-opt '("warning" "Warning" - "String statement has no effect" - "No value passed for parameter" - "imported but unused")))) + "imported but unused" + "redefinition of unused" + "Redefining built-in" + "Redefining name" + "Unused argument" + "Unused variable" + "Dangerous default value {} as argument" + "no newline at end of file" + "Access to a protected member")))) (setq frame-title-format '(:eval (concat "emacs: " (buffer-name)))) (setq geiser-repl-history-filename "~/.emacs.d/geiser-history") (setq gtags-auto-update t) @@ -207,7 +231,9 @@ (setq inhibit-startup-message t) (setq initial-major-mode 'emacs-lisp-mode) (setq initial-scratch-message nil) -(setq jabber-account-list '(("ryuslash@jabber.org"))) +(setq jabber-account-list '(("ryuslash@jabber.org") + ("tom@ryuslash.org" + (:connection-type . ssl)))) (setq jabber-chat-buffer-format "*jabber:%n*") (setq jabber-chat-buffer-show-avatar nil) (setq jabber-chat-fill-long-lines nil) -- cgit v1.2.3-54-g00ecf From 9b975416023580f3b5a3bde2002aa4f7f3bf3ca7 Mon Sep 17 00:00:00 2001 From: Tom Willemsen Date: Fri, 19 Oct 2012 13:33:21 +0200 Subject: .emacs.d/init.el --- .emacs.d/init.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to '.emacs.d/init.el') diff --git a/.emacs.d/init.el b/.emacs.d/init.el index c3d687c..c2ab1be 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -487,7 +487,7 @@ (smex-initialize) (help-at-pt-set-timer) -(load-theme 'new t) +(load-theme 'yoshi t) (load custom-file) (load "rudel-loaddefs.el") -- cgit v1.2.3-54-g00ecf From 19024fdfabd6f4a48178c6ba497a24d2ca7b81fe Mon Sep 17 00:00:00 2001 From: Tom Willemsen Date: Fri, 19 Oct 2012 22:59:45 +0200 Subject: .emacs.d/init.el --- .emacs.d/init.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to '.emacs.d/init.el') diff --git a/.emacs.d/init.el b/.emacs.d/init.el index c2ab1be..42ba442 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -44,6 +44,7 @@ (define-key key-translation-map (kbd "C-l") (kbd "C-j")) (defalias 'yes-or-no-p 'y-or-n-p) +(defalias 'list-buffers 'ibuffer) (eval-after-load "ebuff-menu" '(define-key electric-buffer-menu-mode-map @@ -424,7 +425,6 @@ (global-set-key (kbd "C-e") 'oni:move-end-of-dwim) (global-set-key (kbd "C-k") 'oni:kill-region-or-line) (global-set-key (kbd "C-w") 'oni:kill-region-or-backward-char) -(global-set-key (kbd "C-x C-b") 'electric-buffer-list) (global-set-key (kbd "M-4") 'split-window-horizontally) (global-set-key (kbd "M-n") 'idomenu) (global-set-key (kbd "\"") 'oni:self-insert-dwim) -- cgit v1.2.3-54-g00ecf From 6a9e18bf354f52ae912baa892ed1863711cb7662 Mon Sep 17 00:00:00 2001 From: Tom Willemsen Date: Mon, 22 Oct 2012 23:59:38 +0200 Subject: .emacs.d/init.el --- .emacs.d/init.el | 106 +++++++++++++------------------------------------------ 1 file changed, 25 insertions(+), 81 deletions(-) (limited to '.emacs.d/init.el') diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 42ba442..d25a0f9 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -46,6 +46,21 @@ (defalias 'yes-or-no-p 'y-or-n-p) (defalias 'list-buffers 'ibuffer) +(defface git-commit-summary-face + '((t (:inherit org-level-1))) + "Face for the git title line." + :group 'local) + +(defface git-commit-overlong-summary-face + '((t (:background "#873732"))) + "Face for commit titles that are too long." + :group 'local) + +(defface git-commit-nonempty-second-line-face + '((t (:inherit git-commit-overlong-summary-face))) + "Face for the supposedly empty line in commit messages." + :group 'local) + (eval-after-load "ebuff-menu" '(define-key electric-buffer-menu-mode-map (kbd "C-s") 'isearch-forward)) @@ -96,21 +111,7 @@ '(remove-hook 'jabber-alert-presence-hooks 'jabber-presence-echo)) (eval-after-load "org" - '(progn - (require 'appt) - (require 'org-protocol) - (require 'org-habit) - (require 'org-contacts) - - (add-to-list 'org-modules 'habit) - - (org-indent-mode t) - - (org-agenda-to-appt) - (ad-activate 'org-agenda-redo))) - -(eval-after-load "org-crypt" - '(org-crypt-use-before-save-magic)) + '(require 'org-init)) (eval-after-load "sauron" '(setq sauron-modules (append '(sauron-identica sauron-jabber) @@ -154,6 +155,7 @@ `((".*" . ,temporary-file-directory))) (setq browse-url-browser-function 'browse-url-generic) (setq browse-url-generic-program (getenv "BROWSER")) +(setq comment-auto-fill-only-comments t) (setq custom-file "~/.emacs.d/custom.el") (setq custom-theme-directory "~/.emacs.d/themes") (setq default-frame-alist @@ -186,6 +188,7 @@ "Empty docstring" "multiple imports on one line" "expected 2 blank lines, found 1" + "expected 2 blank lines, found 0" "TODO:" "whitespace after '{'" "whitespace before '}'" @@ -201,7 +204,8 @@ "missing whitespace after ','" "line too long" "at least two spaces before inline comment" - "trailing whitespace")))) + "trailing whitespace" + "too many blank lines")))) (setq flymake-log-file-name (expand-file-name "~/.emacs.d/flymake.log")) (setq flymake-log-level 0) (setq flymake-warn-line-regexp @@ -262,68 +266,6 @@ (oni:email ryuslash at gmail dot com) (oni:email ryuslash at ninthfloor dot org) (oni:email thomas at aethon dot nl))) -(setq org-agenda-custom-commands - '(("wt" "Work todo." - tags-todo "CATEGORY=\"Work\"") - ("wm" "Myaethon2 todo." - tags-todo "CATEGORY=\"myaethon2\""))) -(setq org-agenda-sorting-strategy - '((agenda habit-down time-up priority-down category-keep) - (todo priority-down category-up) - (tags priority-down category-keep) - (search category-keep))) -(setq org-capture-templates - '(("t" "Task" entry (file "~/documents/org/tasks") - "* TODO %?") - ("h" "Habit" entry (file "") - (concat "* TODO %^{Description}\n" - " SCHEDULED: %^T\n" - " :PROPERTIES:\n" - " :STYLE: habit\n" - " :END:") - :immediate-finish t) - ("l" "Log" entry (file+headline "" "notes") - (concat "* %n %<%d-%m-%Y %H:%M:%S>\n" - " %a\n\n" - " %?") - :prepend t :empty-lines 1) - ("a" "Appointment" entry (file+headline "" "appointments") - "* %^{Description} %^T" :immediate-finish t) - ("b" "Bookmark" entry (file "~/documents/org/misc/bookmarks.org") - "* %c\n\n %:initial"))) -(setq org-contacts-files '("~/documents/org/misc/contacts.org")) -(setq org-directory (expand-file-name "~/documents/org")) -(setq org-agenda-files - `(,(concat org-directory "/org") - ,(concat org-directory "/misc/contacts.org") - ,(concat org-directory "/misc/bookmarks.org"))) -(setq org-default-notes-file (concat org-directory "/org")) -(setq org-export-htmlize-output-type 'css) -(setq org-feed-alist - '(("MyEpisodes" - "http://www.myepisodes.com/rss.php?feed=mylist&uid=Slash&pwdmd5=04028968e1f0b7ee678b748a4320ac17" - "~/documents/org/tasks" "MyEpisodes" - :formatter oni:myepisodes-formatter))) -(setq org-hide-emphasis-markers t) -(setq org-outline-path-complete-in-steps t) -(setq org-refile-allow-creating-parent-nodes t) -(setq org-refile-targets '((nil . (:maxlevel . 6)))) -(setq org-refile-use-outline-path 'file) -(setq org-return-follows-link t) -(setq org-src-fontify-natively t) -(setq org-tags-exclude-from-inheritance '("crypt")) -(setq org-todo-keyword-faces - '(("TODO" :background "red") - ("DONE" :background "forest green") - ("SUCCEEDED" :background "forest green") - ("WAITING" :background "orange" :foreground "black") - ("CANCELLED" :background "orange red") - ("FAILED" :background "orange red") - ("WIP" :background "#ff9800" :foreground "black") - ("HOLD" :background "orange" :foreground "black") - ("ACQUIRE" :background "red") - ("IGNORED" :background "#555555"))) -(setq org-use-fast-todo-selection t) (setq package-archives '(("melpa" . "http://melpa.milkbox.net/packages/") ("ELPA" . "http://tromey.com/elpa/") @@ -393,7 +335,6 @@ (add-hook 'term-mode-hook 'oni:term-mode-func) (add-hook 'texinfo-mode-hook 'oni:texinfo-mode-func) (add-hook 'write-file-hooks 'oni:write-file-func) -(add-hook 'yas-minor-mode-hook 'oni:yas-minor-mode-func) (global-set-key (kbd "'") 'oni:self-insert-dwim) (global-set-key (kbd "") 'emms-next) @@ -408,8 +349,8 @@ (global-set-key (kbd "") 'jabber-switch-to-roster-buffer) (global-set-key (kbd "") 'magit-status) (global-set-key (kbd "") 'oni:raise-eshell) -(global-set-key (kbd "C-<") 'indent-shift-left) -(global-set-key (kbd "C->") 'indent-shift-right) +(global-set-key (kbd "C-<") 'oni:indent-shift-left) +(global-set-key (kbd "C->") 'oni:indent-shift-right) (global-set-key (kbd "C-M-4") 'split-window-vertically) (global-set-key (kbd "C-M-SPC") 'er/expand-region) (global-set-key (kbd "C-M-d") 'kill-word) @@ -496,6 +437,9 @@ (load "quick-edit-mode") (global-set-key (kbd "C-z") 'quick-edit-mode) +(unless (server-running-p) + (load "wm-init")) + (provide 'init) ;;; init.el ends here -- cgit v1.2.3-54-g00ecf From 89b0ac6c2b8137758f93be83a62af1ce17a16f36 Mon Sep 17 00:00:00 2001 From: Tom Willemsen Date: Tue, 23 Oct 2012 00:02:14 +0200 Subject: .emacs.d/init.el --- .emacs.d/init.el | 14 -------------- 1 file changed, 14 deletions(-) (limited to '.emacs.d/init.el') diff --git a/.emacs.d/init.el b/.emacs.d/init.el index d25a0f9..6c14fe6 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -113,10 +113,6 @@ (eval-after-load "org" '(require 'org-init)) -(eval-after-load "sauron" - '(setq sauron-modules (append '(sauron-identica sauron-jabber) - sauron-modules))) - (eval-after-load "smex" '(progn (global-set-key (kbd "M-x") 'smex) @@ -280,21 +276,11 @@ (setq pony-tpl-indent-moves t) (setq rainbow-delimiters-max-face-count 12) (setq redisplay-dont-pause t) -(setq sauron-column-alist '((timestamp . 6) - (message))) -(setq sauron-hide-mode-line t) -(setq sauron-max-line-length 189) -(setq sauron-timestamp-format "%H:%M") -(setq sauron-watch-nicks '("ryuslash")) -(setq sauron-watch-patterns '("ryuslash")) (setq scroll-conservatively 101) (setq send-mail-function 'smtpmail-send-it) (setq sendmail-program "/usr/bin/msmtp") (setq smex-key-advice-ignore-menu-bar t) (setq smex-save-file "~/.emacs.d/smex-items") -(setq special-display-buffer-names '("*Sauron*")) -(setq special-display-frame-alist '((minibuffer . nil) - (right-fringe . 0))) (setq split-height-threshold 40) (setq time-stamp-active t) (setq time-stamp-format "%04y-%02m-%02d %02H:%02M:%02S (%u)") -- cgit v1.2.3-54-g00ecf From a38365ecf327a925f9eaf455a4bbb3009281e364 Mon Sep 17 00:00:00 2001 From: Tom Willemsen Date: Tue, 23 Oct 2012 00:06:35 +0200 Subject: .emacs.d/init.el --- .emacs.d/init.el | 26 +++----------------------- 1 file changed, 3 insertions(+), 23 deletions(-) (limited to '.emacs.d/init.el') diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 6c14fe6..173c285 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -110,6 +110,9 @@ (eval-after-load "jabber" '(remove-hook 'jabber-alert-presence-hooks 'jabber-presence-echo)) +(eval-after-load "mu4e" + '(require 'mu4e-init)) + (eval-after-load "org" '(require 'org-init)) @@ -118,15 +121,6 @@ (global-set-key (kbd "M-x") 'smex) (global-set-key (kbd "C-M-x") 'smex-major-mode-commands))) -(oni:define-mailbox "aethon" - (oni:email thomas at aethon dot nl) - (expand-file-name "~/documents/work/aethon/signature.txt")) -(oni:define-mailbox "gmail" (oni:email ryuslash at gmail dot com)) -(oni:define-mailbox "ninthfloor" - (oni:email ryuslash at ninthfloor dot org)) -(oni:define-mailbox "ryuslash" (oni:email tom at ryuslash dot org) - nil "ryuslash.org") - (put 'upcase-region 'disabled nil) (put 'downcase-region 'disabled nil) (put 'narrow-to-region 'disabled nil) @@ -248,20 +242,6 @@ (setq message-log-max 1000) (setq message-send-mail-function 'message-send-mail-with-sendmail) (setq mode-line-position nil) -(setq mu4e-headers-date-format "%d-%m %H:%M") -(setq mu4e-headers-fields '((:date . 11) - (:flags . 6) - (:to . 22) - (:from . 22) - (:subject))) -(setq mu4e-headers-show-threads nil) -(setq mu4e-headers-sort-revert nil) -(setq mu4e-html2text-command "w3m -dump -T text/HTML -cols 72") -(setq mu4e-my-email-addresses (list - (oni:email tom at ryuslash dot org) - (oni:email ryuslash at gmail dot com) - (oni:email ryuslash at ninthfloor dot org) - (oni:email thomas at aethon dot nl))) (setq package-archives '(("melpa" . "http://melpa.milkbox.net/packages/") ("ELPA" . "http://tromey.com/elpa/") -- cgit v1.2.3-54-g00ecf From af62874a4a0023a572a1df84ec441376ee66c59b Mon Sep 17 00:00:00 2001 From: Tom Willemsen Date: Tue, 23 Oct 2012 00:23:36 +0200 Subject: .emacs.d/init.el --- .emacs.d/init.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) (limited to '.emacs.d/init.el') diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 173c285..4dc6873 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -337,9 +337,7 @@ (global-set-key (kbd "\"") 'oni:self-insert-dwim) (if (daemonp) - (global-set-key "\C-x\C-c" 'oni:close-client-window) - (unless (server-running-p) - (server-start))) + (global-set-key "\C-x\C-c" 'oni:close-client-window)) (when (or window-system (daemonp)) (global-unset-key "\C-z")) @@ -404,6 +402,7 @@ (global-set-key (kbd "C-z") 'quick-edit-mode) (unless (server-running-p) + (server-start) (load "wm-init")) (provide 'init) -- cgit v1.2.3-54-g00ecf