removed org sharing from .emacs
added lua-mode to .emacs.d files
changed timestamp to [mm:ss] to match status bar in irssi/custom.theme
added newsbeuter configuration
This commit is contained in:
Tom Willemsen 2010-12-21 22:21:40 +01:00
parent f285419db9
commit 2c39413e1e
6 changed files with 1198 additions and 18 deletions

59
emacs
View file

@ -12,7 +12,7 @@
(require 'lua-mode) (require 'lua-mode)
(require 'tabbar) (require 'tabbar)
(require 'minimap) (require 'minimap)
(require 'manage-org) ;(require 'manage-org)
;; Auto complete ;; Auto complete
(require 'auto-complete-config) (require 'auto-complete-config)
@ -27,7 +27,7 @@
(autoload 'javascript-mode (autoload 'javascript-mode
"javascript.elc" "A Major mode for editing JavaScript files" t) "javascript.elc" "A Major mode for editing JavaScript files" t)
(autoload 'sqlplus-mode (autoload 'sqlplus-mode
"sqlplus,elc" "A Major mode for communicating with Oracle" t) "sqlplus.elc" "A Major mode for communicating with Oracle" t)
(autoload 'batch-mode (autoload 'batch-mode
"batch-mode.elc" "A Major mode for editing Batch files" t) "batch-mode.elc" "A Major mode for editing Batch files" t)
(autoload 'rainbow-mode (autoload 'rainbow-mode
@ -37,8 +37,8 @@
(require 'functions) (require 'functions)
;; Platform specifics ;; Platform specifics
(if (eq system-type 'gnu/linux) ; if we're running linux ;(if (eq system-type 'gnu/linux) ; if we're running linux
(set-frame-font "-xos4-terminus-medium-*-*-*-14-*-*-*-*-*-*-*")) (set-default-font "-*-terminus-medium-*-*-*-14-*-*-*-*-*-*-*");)
;; Variables ;; Variables
(setq (setq
@ -246,6 +246,22 @@
;;(require 'color-theme-weirdness) ;;(require 'color-theme-weirdness)
(color-theme-zenburn) (color-theme-zenburn)
;; Test for frame fonts
(defun setup-system-frame-colours (&rest frame)
(let ((f (if (car frame)
(car frame)
(selected-frame))))
(progn
(set-frame-font "-*-terminus-medium-*-*-*-14-*-*-*-*-*-*-*"))))
(require 'server)
(defadvice server-create-window-system-frame
(after set-system-frame-colours ())
"Set custom frame colours when creating the first frame on a display"
(message "Running after frame-initialize")
(setup-system-frame-colours))
(ad-activate 'server-create-window-system-frame)
(add-hook 'after-make-frame-functions 'setup-system-frame-colours t)
;; Hooks ;; Hooks
(add-hook 'find-file-hook 'flymake-find-file-hook) (add-hook 'find-file-hook 'flymake-find-file-hook)
(add-hook 'find-file-hook (add-hook 'find-file-hook
@ -258,6 +274,15 @@
(if (string-equal suffix "el") (if (string-equal suffix "el")
(byte-compile-file fname)))) (byte-compile-file fname))))
;(add-hook 'after-make-frame-hook
; (lambda ()
; (set-default-font "-*-terminus-medium-*-*-*-14-*-*-*-*-*-*-*")
; (message "hello")
; (set-frame-font "-*-terminus-medium-*-*-*-14-*-*-*-*-*-*-*")))
;(add-hook 'after-make-frame-functions
; (lambda (&rest frame)
; (message "world")
; (set-frame-font "-*-terminus-medium-*-*-*-14-*-*-*-*-*-*-*")) t)
;;; C ;;; C
(add-hook 'c-mode-hook (add-hook 'c-mode-hook
(lambda () (lambda ()
@ -284,19 +309,19 @@
(auto-fill-mode 1) (auto-fill-mode 1)
(message "org-mode started"))) (message "org-mode started")))
(defvar org-loaded nil) ;(defvar org-loaded nil)
(add-hook 'org-agenda-mode-hook ;(add-hook 'org-agenda-mode-hook
(lambda () ; (lambda ()
(if (not org-loaded) ; (if (not org-loaded)
(progn ; (progn
(add-hook 'kill-emacs-hook ; (add-hook 'kill-emacs-hook
(lambda () ; (lambda ()
(save-org-files) ; (save-org-files)
(push-org-files))) ; (push-org-files)))
(get-org-files) ; (get-org-files)
(setq org-loaded t))))) ; (setq org-loaded t)))))
(if (not (file-exists-p "~/prj/org")) ;(if (not (file-exists-p "~/prj/org"))
(clone-org-files)) ; (clone-org-files))
(custom-set-variables (custom-set-variables
;; custom-set-variables was added by Custom. ;; custom-set-variables was added by Custom.

1135
emacs.d/lua-mode.el Normal file

File diff suppressed because it is too large Load diff

View file

@ -22,6 +22,8 @@ linkmy emacs.d .emacs.d
linkmy irssi .irssi linkmy irssi .irssi
# NCMPCPP # NCMPCPP
linkmy ncmpcpp .ncmpcpp linkmy ncmpcpp .ncmpcpp
# NEWSBEUTER
linkmy newsbeuter .newsbeuter
# VIM # VIM
linkmy vimrc .vimrc linkmy vimrc .vimrc
linkmy vim .vim linkmy vim .vim

View file

@ -6,7 +6,7 @@ abstracts = {
line_start = "%K:%w:%W: "; line_start = "%K:%w:%W: ";
# timestamp styling # timestamp styling
timestamp = "%0 $* %n"; timestamp = "%0 %c[%n$*%c]%n %n";
## ##
## messages ## messages

3
newsbeuter/.gitignore vendored Normal file
View file

@ -0,0 +1,3 @@
cache.*
credentials
history.*

15
newsbeuter/config Normal file
View file

@ -0,0 +1,15 @@
include "~/.newsbeuter/credentials"
urls-source "googlereader"
googlereader-show-special-feeds no
auto-reload yes
browser luakit
feedlist-format "%-35t %?d?- %-35d&? %> %u"
notify-program notify-send
notify-beep yes
reload-threads 3
show-read-feeds no
show-read-articles no
text-width 80
articlelist-format "%t %> %f"
feedlist-title-format "%N %V %> %u feeds with new articles"
articlelist-title-format "%N %V %T"