Commits

Anonymous committed 3dbfa7f Merge

now - by default - both dark and light faces are active. and none is selected by default (console colors=default)

Comments (0)

Files changed (29)

+Emacs.foreground: black
+Emacs.background: gray96
+Emacs.pointerColor: #50a3e6
+Emacs.fringe.attributeBackground: #add8e6

.Xresources-dark

-Emacs.foreground: wheat1
-Emacs.background: #0f1a39
-Emacs.fringe.attributeBackground: #0f1a39
-Emacs.pointerColor: LightPink1
-Emacs.cursorColor: Red
     (load (expand-file-name
 	   (concat emacs-config-dir file)))
     (message "Loaded config file:%s" file)
+    (cond
+     (
+      (file-exists-p (concat emacs-config-dir file "_custom.el"))
+      (load (concat emacs-config-dir file "_custom"))
+      (message "Loaded custom config file: %s_custom.el" file)
+      )
+     )
     ))
 
 
 		  "cfg_apache-mode"   ; editing apache files
 		  "cfg_crontab-mode"  ; editing crontab files
 		  "cfg_subversion"    ; subversion VC
+		  "cfg_keybindings"   ; my own custom keybindings
+		  "cfg_helm"
 		  "cfg_css-mode"      ; CSS mode
 		  "cfg_php-mode"      ; PHP mode
 		  "cfg_tramp"         ; editing files remotely via SSH,rsync,etc..
 		  "cfg_killbuffer"    ; ctrl+Delete kills buffer
-;		  "cfg_color-theme"   ; choose your color theme
 		  "cfg_uniquify"      ; unique buffer names
 ;		  "cfg_tabbar"        ; tabbar disabled due to rendering speed issues
 		  "cfg_auto-complete" ; http://cx4a.org/software/auto-complete/, http://www.youtube.com/watch?v=rGVVnDxwJYE
 		  "cfg_po-mode"       ; .po files support
 ;		  "cfg_wl" ; wl disabled because it is slow, and commands are not easy to understand
 ;		  "cfg_w3m"           ; disabled because requires some extension
-		  "cfg_default_face"  ; workaround to configure default font
 		  "cfg_gnuserv"       ; enable multiple emacs windows in process (fast!)
-		  "cfg_keybindings"   ; my own custom keybindings
 		  "cfg_macro"         ; enable macro support & replay
 		  "cfg_bookmarks"     ; bookmark places in files
 		  "cfg_thingapt"      ; alternative scheme of cursor jumps on alt-f,b
 		  "cfg_ruby"
 		  "cfg_disable_vc"    ; for sshfs: http://stackoverflow.com/questions/5748814/how-does-one-disable-vc-git-in-emacs
 		  "cfg_vlf"           ; view large files
-		  "cfg_package"       ; emacs 24 packages
+;		  "cfg_package"       ; emacs 24 packages
 		  "cfg_htmlize"       ; Convert buffer text and decorations to HTML
 		  "cfg_whitespace"
-		  "cfg_notmuch"       ; not much mail client
+		  "cfg_notmuch"       ; not much mail client generic settings
 		  "cfg_ido_for_mode"
-		  "cfg_helm"
-		  "cfg_org-redmine" ; PROBLEM: this module affects IM-python menu! DISABLED
-;		  "cfg_color_theme_avk2_dark" ; just to store it, but no need to enable always
+;		  "cfg_org-redmine" ; PROBLEM: this module affects IM-python menu! DISABLED
+		  "cfg_scroll"        ; avoid "jumping" during scroll
+;		  "cfg_avk_sqlpass"
+		  "cfg_duplicate_line"
+		  "cfg_frame_title"
+		  "cfg_passwords"
+		  "cfg_jabber"
+		  ; need to load default faces last
+		  "cfg_mode-line"
+		  "cfg_default_face"  ; workaround to configure default font
 		  ))
 
 (custom-set-variables
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
  '(ange-ftp-passive-host-alist (quote (("redbus2.chalkface.com" . "on") ("zope.halogen-dg.com" . "on") ("85.119.217.50" . "on"))))
- '(blink-cursor-mode nil)
+ '(ansi-color-names-vector ["black" "red" "dark green" "dark orange" "RoyalBlue4" "magenta" "dark cyan" "white"])
+ '(blink-cursor-mode t)
  '(browse-url-browser-function (quote browse-url-generic))
  '(browse-url-generic-program "/home/avk/bin/browser.py")
  '(browse-url-new-window-flag t)
  '(ibuffer-expert t)
  '(inhibit-startup-screen t)
  '(initial-frame-alist (quote ((width . 86) (height . 35))))
- '(initsplit-customizations-alist (quote (("tabbar" "configs/cfg_tabbar.el" t) ("ange\\-ftp" "configs/cfg_ange_ftp.el" t) ("dired" "configs/cfg_dired.el" t) ("font\\-lock" "configs/cfg_font-lock.el" t) ("tramp" "configs/cfg_tramp.el" t) ("uniquify" "configs/cfg_uniquify.el" t) ("default" "configs/cfg_font-lock.el" t) ("ido" "configs/cfg_ido-mode.el" t) ("org" "configs/cfg_orgmode.el" t) ("gnus" "configs/cfg_gnus.el" t) ("nnmail" "configs/cfg_gnus.el" t) ("recentf" "configs/cfg_recentf.el" t) ("wl\\-" "configs/cfg_wl.el" t) ("default" "configs/cfg_default.el" t) ("flymake" "configs/cfg_flymake.el" t) ("notmuch\\-saved\\-searches" "configs/cfg_avk_notmuch.el" t) ("notmuch\\-" "configs/cfg_notmuch.el" t))))
+ '(initsplit-customizations-alist (quote (("tabbar" "configs/cfg_tabbar.el" t) ("ange\\-ftp" "configs/cfg_ange_ftp.el" t) ("dired" "configs/cfg_dired.el" t) ("font\\-lock" "configs/cfg_font-lock.el" t) ("tramp" "configs/cfg_tramp.el" t) ("uniquify" "configs/cfg_uniquify.el" t) ("default" "configs/cfg_font-lock.el" t) ("ido" "configs/cfg_ido-mode.el" t) ("org" "configs/cfg_orgmode.el" t) ("gnus" "configs/cfg_gnus.el" t) ("nnmail" "configs/cfg_gnus.el" t) ("recentf" "configs/cfg_recentf.el" t) ("wl\\-" "configs/cfg_wl.el" t) ("default" "configs/cfg_default.el" t) ("flymake" "configs/cfg_flymake.el" t) ("notmuch\\-saved\\-searches" "configs/cfg_avk_notmuch.el" t) ("notmuch\\-" "configs/cfg_notmuch.el" t) ("sql-connection-alist" "configs/cfg_avk_sqlpass.el" t) ("jabber" "configs/cfg_jabber.el" nil))))
  '(ispell-program-name "aspell")
- '(jabber-account-list (quote (("alex@halogen-dg.com"))))
- '(jabber-nickname "AVK")
- '(jabber-password nil)
- '(jabber-server "halogen-dg.com")
- '(jabber-username "alex")
  '(mark-ring-max 64)
  '(menu-bar-mode nil)
  '(mouse-autoselect-window t)
  '(w3m-use-cookies t)
  '(which-function-mode t)
  '(woman-use-own-frame nil)
- '(x-select-enable-primary nil))
+ '(x-select-enable-primary nil)
+ '(x-stretch-cursor t))
 
-(custom-set-faces
- ;; custom-set-faces was added by Custom.
- ;; If you edit it by hand, you could mess it up, so be careful.
- ;; Your init file should contain only one such instance.
- ;; If there is more than one, they won't work right.
- '(default ((t (:inherit nil :stipple nil :background "#0f1a39" :foreground "pale goldenrod" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 110 :width normal :foundry "unknown" :family "DejaVu Sans Mono"))))
- '(ac-candidate-face ((t (:foreground "RosyBrown3" :weight bold))))
- '(ac-selection-face ((t (:background "royalBlue4" :foreground "yellow2" :weight bold))))
- '(ahg-status-deleted-face ((default (:inherit font-lock-warning-face)) (nil nil)))
- '(ahg-status-modified-face ((default (:foreground "forest green")) (nil nil)))
- '(ahg-status-unknown-face ((default (:foreground "yellow3")) (nil nil)))
- '(anything-ff-directory ((t (:inherit dired-directory))))
- '(anything-header ((t (:inherit font-lock-function-name-face))))
- '(bm-face ((t (:background "#460000" :box (:line-width 2 :color "#460000" :style released-button) :weight bold))))
- '(compilation-error ((t (:inherit font-lock-warning-face :foreground "red2"))))
- '(compilation-line-number ((t (:inherit font-lock-variable-name-face :background "#271a39"))))
- '(cursor ((t (:background "red"))))
- '(custom-variable-tag ((((class color) (background dark)) (:inherit variable-pitch :foreground "DarkOrange" :weight bold))))
- '(diff-added ((t (:foreground "lime green"))))
- '(diff-removed ((t (:foreground "light coral"))))
- '(django-tag-face ((t (:background "#330a3c" :foreground "#dddddd"))) t)
- '(django-variable-face ((t (:foreground "deep sky blue"))) t)
- '(dropdown-list-face ((t (:inherit default :background "gray89" :foreground "black"))))
- '(dropdown-list-selection-face ((t (:inherit dropdown-list :background "#6d1717"))))
- '(ecb-analyse-face ((((class color) (background dark)) (:inherit ecb-default-highlight-face :background "DarkSlateBlue" :foreground "white"))))
- '(ecb-source-face ((((class color) (background dark)) (:inherit ecb-default-highlight-face :background "DeepSkyBlue" :foreground "white"))))
- '(ecb-tag-header-face ((((class color) (background dark)) (:background "SeaGreen1" :foreground "black"))))
- '(helm-buffer-saved-out ((t (:foreground "red"))))
- '(helm-ff-directory ((t (:inherit dired-directory))))
- '(helm-ff-executable ((t (:foreground "green" :weight bold))))
- '(helm-ff-invalid-symlink ((t (:inherit dired-symlink :strike-through "red"))))
- '(helm-ff-symlink ((t (:inherit dired-symlink))))
- '(helm-selection ((t (:inherit hl-line))))
- '(helm-source-header ((t (:inherit font-lock-function-name-face))))
- '(helm-visible-mark ((t (:background "dark green"))))
- '(highlight ((t (:background "gray30"))))
- '(highlight-changes ((((min-colors 88) (class color)) (:background "#00254a"))))
- '(highlight-changes-delete ((((min-colors 88) (class color)) (:background "#8b6969"))))
- '(hl-line ((t (:background "#053241"))))
- '(isearch ((t (:background "orange" :foreground "black"))))
- '(lazy-highlight ((((class color) (min-colors 88) (background dark)) (:background "darkgreen" :foreground "black"))))
- '(match ((((class color) (min-colors 88) (background dark)) (:background "#971d5c"))))
- '(message-cited-text ((((class color) (background dark)) (:foreground "SandyBrown"))))
- '(message-header-name ((((class color) (background dark)) (:foreground "DarkGrey"))))
- '(message-header-other ((((class color) (background dark)) (:foreground "LightPink2"))))
- '(message-header-subject ((((class color) (background dark)) (:foreground "yellow2"))))
- '(message-separator ((((class color) (background dark)) (:foreground "thistle"))))
- '(minibuffer-prompt ((((background dark)) (:foreground "gold2" :weight bold))))
- '(mode-line ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button) :slant normal :weight normal :height 1.0 :width condensed :foundry "unknown" :family "terminus"))))
- '(mode-line-inactive ((t (:inherit mode-line :background "dark slate" :foreground "grey80" :box (:line-width -1 :color "grey40") :weight light))))
- '(mumamo-background-chunk-major ((((class color) (min-colors 88) (background dark)) (:background "#123a4d"))))
- '(mumamo-background-chunk-submode1 ((((class color) (min-colors 88) (background dark)) (:background "#2e2e51"))))
- '(outline-3 ((t (:foreground "seashell3"))))
- '(outline-7 ((t (:foreground "chartreuse"))))
- '(py-XXX-tag-face ((t (:background "medium violet red" :foreground "white"))) t)
- '(py-builtins-face ((t (:foreground "medium sea green"))) t)
- '(py-decorators-face ((t (:foreground "cyan4"))) t)
- '(py-pseudo-keyword-face ((t (:foreground "RosyBrown3"))) t)
- '(region ((t (:background "chartreuse4" :foreground "white"))))
- '(rst-level-1-face ((t (:background "SlateBlue4"))) t)
- '(rst-level-2-face ((t (:background "grey20"))) t)
- '(secondary-selection ((t (:background "forest green" :foreground "white"))))
- '(shadow ((((class color grayscale) (min-colors 88) (background dark)) (:foreground "grey40"))))
- '(smerge-refined-change ((t (:background "midnight blue"))))
- '(tooltip ((((class color)) (:inherit variable-pitch :background "IndianRed1" :foreground "black"))))
- '(trailing-whitespace ((((class color) (background dark)) (:background "#552749"))))
- '(which-func ((((class color) (min-colors 88) (background dark)) (:foreground "dark red"))))
- '(whitespace-empty ((t (:background "#49135f"))))
- '(whitespace-line ((t (:foreground "DarkOrange1"))))
- '(whitespace-space ((((class color) (background dark)) (:foreground "gray40"))))
- '(whitespace-tab ((t (:background "#032251"))))
- '(widget-button ((t (:foreground "sienna2" :weight bold)))))
 
-; things which only work when they are placed at the end of .emacs:
+;; ; things which only work when they are placed at the end of .emacs:
 (fonttrick_dejavu1)
 (put 'dired-find-alternate-file 'disabled nil)
 
-(load-cfg-files '(
-		  "cfg_mode-line" ; Nice modeline, especially useful to mark column 80
-		  ))
+; (fn-ubuntu)
+
+(custom-set-faces)
 ^helm/.*
 ^image-dired/.
 ^session.*
-^configs/cfg_avk.*
+^configs/cfg_.*_custom.el$
 ^configs/cfg_org-redmine.el
+^emacs-color-theme-solarized/.*
+^configs/cfg_avk_notmuch.el$
+^configs/cfg_jabber.el$

ahg-short-log-avk.1.diff

+diff --git a/ahg.el b/ahg.el
+--- a/ahg.el
++++ b/ahg.el
+@@ -219,6 +219,10 @@
+   '((default (:inherit font-lock-string-face)))
+   "Face for date field in aHg short log buffers." :group 'ahg)
+ 
++(defface ahg-short-log-branch-face
++  '((default (:inherit font-lock-string-face)))
++  "Face for branch field in aHg short log buffers." :group 'ahg)
++
+ (defface ahg-log-revision-face
+   '((default (:inherit font-lock-variable-name-face)))
+   "Face for revision field in aHg log buffers." :group 'ahg)
+@@ -257,6 +261,7 @@
+ (defvar ahg-status-unknown-face 'ahg-status-unknown-face)
+ (defvar ahg-short-log-revision-face 'ahg-short-log-revision-face)
+ (defvar ahg-short-log-date-face 'ahg-short-log-date-face)
++(defvar ahg-short-log-branch-face 'ahg-short-branch-face)
+ (defvar ahg-log-field-face 'ahg-log-field-face)
+ (defvar ahg-log-branch-face 'ahg-log-branch-face)
+ (defvar ahg-log-revision-face 'ahg-log-revision-face)
+@@ -1010,13 +1015,11 @@
+                       (propertize p2 'face ahg-short-log-date-face)
+                       (propertize (trim 8 p3) 'face ahg-short-log-user-face)
+                       p4))
+-           (pad (if (< (length s) width)
+-                    (make-string (- width (length s)) ? )
+-                  "")))
+-      (insert (propertize (concat s pad) 'mouse-face 'highlight
++           )
++      (insert (propertize s 'mouse-face 'highlight
+                           'keymap ahg-short-log-line-map
+                           'help-echo p4)))))
+-        
++
+ (defun ahg-short-log-insert-contents (ewoc contents)
+   (let ((lines (split-string contents "\n")))
+     (labels ((format-line (line)
+@@ -1162,7 +1165,7 @@
+                   (propertize "hg log for " 'face ahg-header-line-face)
+                   (propertize default-directory 'face ahg-header-line-root-face)
+                   "\n\n" (propertize (make-string width ?-) 'face 'bold) "\n"
+-                  (propertize "    Rev |    Date    |  Author  | Summary\n"
++                  (propertize "    Rev      |    Date    |  Author  | Summary\n"
+                               'face 'bold)
+                   (propertize (make-string width ?-) 'face 'bold)))
+          (footer (propertize (make-string width ?-) 'face 'bold))
+@@ -1187,7 +1190,7 @@
+     (setq command-list
+           (append command-list
+                   (list "--template"
+-                        "{rev} {date|shortdate} {author|user} {desc|firstline}\\n")
++                        "{node|short} {date|shortdate} {author|user} {desc|firstline} ({branches})\\n")
+                   (when extra-flags (split-string extra-flags))))
+     (when ahg-file-list-for-log-command
+       (setq command-list (append command-list ahg-file-list-for-log-command)))

ahg-short-log-avk.diff

+diff -r a426ee844b7d ahg.el
+--- a/ahg.el	Fri Oct 21 09:37:21 2011 +0200
++++ b/ahg.el	Sun Jan 20 08:32:07 2013 +0200
+@@ -219,6 +219,10 @@
+   '((default (:inherit font-lock-string-face)))
+   "Face for date field in aHg short log buffers." :group 'ahg)
+ 
++(defface ahg-short-log-branch-face
++  '((default (:inherit font-lock-string-face)))
++  "Face for branch field in aHg short log buffers." :group 'ahg)
++
+ (defface ahg-log-revision-face
+   '((default (:inherit font-lock-variable-name-face)))
+   "Face for revision field in aHg log buffers." :group 'ahg)
+@@ -257,6 +261,7 @@
+ (defvar ahg-status-unknown-face 'ahg-status-unknown-face)
+ (defvar ahg-short-log-revision-face 'ahg-short-log-revision-face)
+ (defvar ahg-short-log-date-face 'ahg-short-log-date-face)
++(defvar ahg-short-log-branch-face 'ahg-short-branch-face)
+ (defvar ahg-log-field-face 'ahg-log-field-face)
+ (defvar ahg-log-branch-face 'ahg-log-branch-face)
+ (defvar ahg-log-revision-face 'ahg-log-revision-face)
+@@ -1162,7 +1167,7 @@
+                   (propertize "hg log for " 'face ahg-header-line-face)
+                   (propertize default-directory 'face ahg-header-line-root-face)
+                   "\n\n" (propertize (make-string width ?-) 'face 'bold) "\n"
+-                  (propertize "    Rev |    Date    |  Author  | Summary\n"
++                  (propertize "    Rev      |    Date    |  Author  | Summary\n"
+                               'face 'bold)
+                   (propertize (make-string width ?-) 'face 'bold)))
+          (footer (propertize (make-string width ?-) 'face 'bold))
+@@ -1187,7 +1192,7 @@
+     (setq command-list
+           (append command-list
+                   (list "--template"
+-                        "{rev} {date|shortdate} {author|user} {desc|firstline}\\n")
++                        "{node|short} {date|shortdate} {author|user} {desc|firstline} ({branches})\\n")
+                   (when extra-flags (split-string extra-flags))))
+     (when ahg-file-list-for-log-command
+       (setq command-list (append command-list ahg-file-list-for-log-command)))

configs/cfg_auto-complete.el

 (require 'auto-complete-config)
 (add-to-list 'ac-dictionary-directories "~/.emacs.d/auto-complete/ac-dict")
 (ac-config-default)
+(global-set-key [(control s a)] 'auto-complete-mode)
+

configs/cfg_color-theme.el

 ; with default color definitions which are coming from XWindow system
 ; and additional custom color changes stored in .emacs.d/
 ;
-; (require 'color-theme)
+(require 'color-theme)
+(color-theme-initialize)
+; (color-theme-andreas)
+(color-theme-vim-colors)
+

configs/cfg_default_face.el

   (set-face-font 'default "-unknown-monofur-normal-normal-normal-*-*-*-*-*-m-0-iso10646-1")
 )
 
+
+(defun fn-anonymous ()
+  (interactive)
+  (set-face-font 'default "-unknown-Anonymous Pro-normal-normal-normal-*-*-*-*-*-m-0-iso10646-1")
+  (custom-set-faces
+   '(default ((t (:height 120 ))))
+   )
+)
+
+(defun fn-anonymous-130 ()
+  (interactive)
+  (set-face-font 'default "-unknown-Anonymous Pro-normal-normal-normal-*-*-*-*-*-m-0-iso10646-1")
+  (custom-set-faces
+   '(default ((t (:height 130 ))))
+   )
+)
+
+(defun fn-ubuntu ()
+  (interactive)
+  (set-face-font 'default "-unknown-Ubuntu Mono-normal-normal-normal-*-*-*-*-*-m-0-iso10646-1")
+  (custom-set-faces
+   '(default ((t (:height 120 ))))
+   )
+)
+
+(defun fn-ubuntu-130 ()
+  (interactive)
+  (set-face-font 'default "-unknown-Ubuntu Mono-normal-normal-normal-*-*-*-*-*-m-0-iso10646-1")
+  (custom-set-faces
+   '(default ((t (:height 130 ))))
+   )
+)
+
+(defun fn-dejavu ()
+  (interactive )
+  (set-face-font 'default "-unknown-DejaVu Sans Mono-normal-normal-normal-*-*-*-*-*-m-0-iso10646-1")
+  (custom-set-faces
+   '(default ((t (:height 95 ))))
+   )
+)
+
 (defun fn-normal ()
   (interactive)
   (custom-set-faces
-   '(default ((t (:inherit nil :stipple nil :background "#0f1a39" :foreground "wheat1" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 110 :width normal :foundry "unknown" :family "DejaVu Sans Mono"))))
+   '(default ((t (:height 110))))
    )
 )
 
 (defun fn-smaller ()
   (interactive)
   (custom-set-faces
-   '(default ((t (:inherit nil :stipple nil :background "#0f1a39" :foreground "wheat1" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 97 :width normal :foundry "unknown" :family "DejaVu Sans Mono"))))
+   '(default ((t (:height 97 ))))
    )
 )
 
 (define-key global-map  "\C-cfs1" 'fn-normal)
 (define-key global-map  "\C-cfs2" 'fn-smaller)
 
+(set-cursor-color "red")
+(setq default-cursor-type '(bar . 2))
+;(setq default-cursor-type '(hollow))
+;(setq cursor-type '(hollow))
+;(setq default-cursor-type '(hbar . 2))
+;(blink-cursor-mode 1)
+;(setq default-cursor-type '(box))
+
+
+
+(defun color-theme-avk-light ()
+  (interactive)
+  (custom-set-faces
+   ;; custom-set-faces was added by Custom.
+   ;; If you edit it by hand, you could mess it up, so be careful.
+   ;; Your init file should contain only one such instance.
+   ;; If there is more than one, they won't work right.
+   '(ac-candidate-face ((t (:foreground "RosyBrown3" :weight bold))))
+   '(ac-selection-face ((t (:background "royalBlue4" :foreground "yellow2" :weight bold))))
+   '(ahg-status-deleted-face ((default (:inherit font-lock-warning-face)) (nil nil)))
+   '(ahg-status-modified-face ((t (:inherit diff-added))))
+   '(ahg-status-unknown-face ((t (:foreground "gray31"))))
+   '(anything-ff-directory ((t (:inherit dired-directory))))
+   '(anything-header ((t (:inherit font-lock-function-name-face))))
+   '(bm-face ((t (:background "OliveDrab3" :weight bold))))
+   '(comint-highlight-input ((t (:inherit font-lock-keyword-face))))
+   '(compilation-error ((t (:foreground "red3" :weight ultra-bold))))
+   '(compilation-line-number ((t (:foreground "OrangeRed3" :weight bold))))
+   '(cursor ((t (:background "red"))))
+   '(custom-state ((t (:foreground "deep pink"))))
+   '(custom-variable-tag ((((class color) (background dark)) (:inherit variable-pitch :foreground "DarkOrange" :weight bold)) (t (:foreground "magenta4" :weight bold))))
+   '(default ((t (:inherit nil :stipple nil :background "gray96" :foreground "black" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 130 :width normal :foundry "unknown" :family "Anonymous Pro"))))
+   '(diff-added ((t (:foreground "dark green"))))
+   '(diff-removed ((t (:foreground "maroon"))))
+   '(dired-directory ((t (:inherit font-lock-function-name-face))))
+   '(dired-header ((t (:foreground "blue3" :weight bold :height 1.1 :family "verdana"))))
+   '(dired-mark ((t (:inherit font-lock-constant-face :foreground "VioletRed4"))))
+   '(dired-marked ((t (:background "VioletRed4" :underline "green"))))
+   '(dired-symlink ((t (:inherit font-lock-string-face))))
+   '(django-tag-face ((t (:background "LightSteelBlue1"))) t)
+   '(django-variable-face ((t (:foreground "medium blue"))) t)
+   '(dropdown-list-face ((t (:inherit default :background "gray89" :foreground "black"))))
+   '(dropdown-list-selection-face ((t (:inherit dropdown-list :background "#6d1717"))))
+   '(ecb-analyse-face ((((class color) (background dark)) (:inherit ecb-default-highlight-face :background "DarkSlateBlue" :foreground "white"))))
+   '(ecb-source-face ((((class color) (background dark)) (:inherit ecb-default-highlight-face :background "DeepSkyBlue" :foreground "white"))))
+   '(ecb-tag-header-face ((((class color) (background dark)) (:background "SeaGreen1" :foreground "black"))))
+   '(flymake-errline ((t (:foreground "tomato" :inverse-video t))))
+   '(flymake-infoline ((t (:background "gray87"))))
+   '(flymake-warnline ((t (:underline "DarkSlateGray4"))))
+   '(font-lock-comment-face ((t (:foreground "gray55"))))
+   '(font-lock-function-name-face ((t (:background "khaki2" :box (:line-width 2 :color "gray94" :style released-button) :weight normal))))
+   '(font-lock-keyword-face ((t (:foreground "maroon" :weight bold))))
+   '(font-lock-string-face ((t (:foreground "dark blue" :slant italic))))
+   '(font-lock-warning-face ((t (:inherit nil :foreground "dark orange"))))
+   '(helm-buffer-saved-out ((t (:foreground "red"))))
+   '(helm-ff-directory ((t (:inherit dired-directory))))
+   '(helm-ff-executable ((t (:foreground "green" :weight bold))))
+   '(helm-ff-invalid-symlink ((t (:inherit dired-symlink :strike-through "red"))))
+   '(helm-ff-symlink ((t (:inherit dired-symlink))))
+   '(helm-selection ((t (:inherit hl-line))))
+   '(helm-source-header ((t (:inherit font-lock-function-name-face))))
+   '(helm-visible-mark ((t (:background "dark green"))))
+   '(highlight ((t (:background "green yellow"))))
+   '(highlight-changes ((((min-colors 88) (class color)) (:background "#00254a"))))
+   '(highlight-changes-delete ((((min-colors 88) (class color)) (:background "#8b6969"))))
+   '(hl-line ((t (:background "#cdf8e9"))))
+   '(ido-first-match ((t (:foreground "medium blue" :weight bold))))
+   '(ido-indicator ((t (:foreground "red2" :width condensed))))
+   '(ido-only-match ((t (:foreground "forest green" :weight bold))))
+   '(ido-subdir ((((min-colors 88) (class color)) (:weight bold))))
+   '(isearch ((t (:background "dark orange" :foreground "black"))))
+   '(jabber-chat-prompt-foreign ((t (:inherit custom-face-tag))))
+   '(jabber-chat-prompt-local ((t (:inherit org-level-4))))
+   '(jabber-roster-user-online ((t (:inherit font-lock-string-face))))
+   '(lazy-highlight ((t (:background "chartreuse"))))
+   '(linum ((t (:background "gray92" :foreground "#4d4d7d" :underline nil :slant italic :weight normal :height 0.9))))
+   '(match ((nil (:inherit region :underline t))))
+   '(message-cited-text ((((class color) (background light)) (:foreground "dark magenta")) (((class color) (background dark)) (:foreground "SandyBrown"))))
+   '(message-header-name ((((class color) (background dark)) (:foreground "DarkGrey")) (((background light)) (:inherit font-lock-function-name-face))))
+   '(message-header-other ((((class color) (background dark)) (:foreground "LightPink2"))))
+   '(message-header-subject ((((class color) (background dark)) (:foreground "yellow2"))))
+   '(message-separator ((((class color) (background dark)) (:foreground "thistle"))))
+   '(minibuffer-prompt ((t (:foreground "dark cyan" :weight bold))))
+   '(mode-line ((t (:background "#d0e5cc" :foreground "black" :inverse-video nil :box (:line-width 6 :color "#d0e5cc") :slant normal :weight normal :height 110 :width condensed :foundry "unknown" :family "ubuntu"))))
+   '(mode-line-inactive ((t (:inherit mode-line :background "dark slate" :foreground "grey80" :box (:line-width -1 :color "grey40") :weight light))))
+   '(mumamo-background-chunk-major ((((class color) (min-colors 88) (background dark)) (:background "#123a4d"))))
+   '(mumamo-background-chunk-submode1 ((((class color) (min-colors 88) (background dark)) (:background "#2e2e51"))))
+   '(notmuch-hello-logo-background ((t (:background "#2f4f4f"))))
+   '(notmuch-message-summary-face ((t (:inherit font-lock-function-name-face))))
+   '(notmuch-search-count ((t (:inherit default :foreground "yellow3"))))
+   '(notmuch-search-date ((t (:inherit default :foreground "SpringGreen4"))))
+   '(notmuch-search-subject ((t (:foreground "dark turquoise"))))
+   '(org-agenda-clocking ((t (:background "lavender" :foreground "medium violet red" :weight bold))) t)
+   '(org-agenda-date ((t (:foreground "dark green"))) t)
+   '(org-agenda-date-today ((t (:foreground "dark green" :slant italic :weight bold))) t)
+   '(org-agenda-date-weekend ((t (:inherit org-agenda-date :background "lemon chiffon" :weight bold))) t)
+   '(org-agenda-done ((t (:foreground "dark gray" :strike-through "coral"))))
+   '(org-archived ((t (:foreground "LemonChiffon4"))))
+   '(org-column-title ((t (:background "dodgerblue4" :underline t :weight bold :height 113 :foundry "unknown" :family "DejaVu Sans Mono"))))
+   '(org-date ((t (:background "#fdfdfd" :foreground "slate blue" :underline t))))
+   '(org-done ((t (:foreground "cornsilk4" :strike-through t :weight normal))))
+   '(org-habit-alert-face ((((background dark)) (:background "gold" :foreground "red3"))))
+   '(org-headline-done ((((class color) (min-colors 16) (background dark) (supports :strike-through t :foreground "gray71")) nil) (((class color) (min-colors 16) (background light)) (:foreground "dim gray" :strike-through t))))
+   '(org-hide ((((background dark)) (:foreground "darkslategrey"))))
+   '(org-level-1 ((t (:foreground "medium blue"))))
+   '(org-level-2 ((((class color) (min-colors 16) (background light dark)) (:foreground "dark violet"))))
+   '(org-level-4 ((t (:foreground "dark slate blue"))))
+   '(org-link ((t (:foreground "dark blue" :underline t :weight normal))))
+   '(org-mode-line-clock ((t (:inherit modeline :foreground "dark blue" :slant oblique :height 0.8 :family "sans"))) t)
+   '(org-scheduled ((t (:foreground "dark magenta" :slant italic))))
+   '(org-scheduled-previously ((t (:foreground "firebrick3"))))
+   '(org-scheduled-today ((t (:foreground "DeepSkyBlue4" :slant italic))))
+   '(org-tag ((t (:foreground "gray70" :weight bold))))
+   '(org-todo ((t (:foreground "forest green" :weight bold))))
+   '(org-upcoming-deadline ((((class color) (min-colors 88) (background dark)) (:foreground "indian red"))))
+   '(org-warning ((t (:foreground "hot pink" :weight bold))))
+   '(outline-2 ((t (:foreground "saddle brown"))))
+   '(outline-3 ((t (:foreground "brown"))))
+   '(outline-6 ((t (:foreground "royal blue"))))
+   '(outline-7 ((t (:foreground "darkgoldenrod3"))))
+   '(py-XXX-tag-face ((t (:background "deep sky blue" :foreground "black" :slant italic))) t)
+   '(py-builtins-face ((t (:inherit font-lock-keyword-face :weight normal))) t)
+   '(py-class-name-face ((t (:foreground "SteelBlue4" :weight bold))) t)
+   '(py-decorators-face ((t (:foreground "cyan4"))) t)
+   '(py-exception-name-face ((t (:foreground "medium orchid" :slant italic))) t)
+   '(py-pseudo-keyword-face ((t (:foreground "dark magenta"))) t)
+   '(region ((t (:background "green yellow"))))
+   '(rst-level-1-face ((t (:background "SlateBlue4"))) t)
+   '(rst-level-2-face ((t (:background "grey20"))) t)
+   '(secondary-selection ((t (:background "forest green" :foreground "white"))))
+   '(sh-quoted-exec ((t (:foreground "turquoise4" :weight bold))))
+   '(shadow ((t (:foreground "RosyBrown4"))))
+   '(show-paren-match ((t (:background "DeepSkyBlue1" :foreground "white"))))
+   '(show-paren-mismatch ((t (:background "red" :foreground "white"))))
+   '(smerge-refined-change ((t (:background "midnight blue"))))
+   '(tabbar-default ((t (:inherit variable-pitch :background "gray75" :foreground "MidNightBlue" :family "verdana"))))
+   '(tabbar-selected ((t (:inherit tabbar-default :foreground "red4" :family "verdana"))))
+   '(tooltip ((((class color)) (:inherit variable-pitch :background "IndianRed1" :foreground "black"))))
+   '(trailing-whitespace ((t (:background "#dae8ff"))))
+   '(which-func ((((class color) (min-colors 88) (background dark)) (:foreground "dark red"))))
+   '(whitespace-empty ((t (:background "thistle1"))))
+   '(whitespace-line ((t (:foreground "tomato"))))
+   '(whitespace-space ((((class color) (background dark)) (:foreground "gray40"))))
+   '(whitespace-tab ((t (:background "gray96"))))
+   '(whitespace-trailing ((t (:background "gray81" :weight bold))))
+   '(widget-button ((t (:inherit font-lock-keyword-face :weight bold))))
+   '(fringe ((t (:background "#add8e6"))))
+   )
+  (mode-line-faces-light)
+  (fn-ubuntu)
+)
+
+
+
+(defun color-theme-avk-dark ()
+  (interactive)
+  (custom-set-faces
+   '(ac-candidate-face ((t (:background "gray23" :foreground "yellow2" :weight bold))))
+   '(ac-selection-face ((t (:background "royalBlue4" :foreground "yellow2" :weight bold))))
+   '(ahg-status-deleted-face ((default (:inherit font-lock-warning-face)) (nil nil)))
+   '(ahg-status-modified-face ((default (:foreground "forest green")) (nil nil)))
+   '(ahg-status-unknown-face ((default (:foreground "yellow3")) (nil nil)))
+   '(anything-ff-directory ((t (:inherit dired-directory))))
+   '(anything-header ((t (:inherit font-lock-function-name-face))))
+   '(bm-face ((t (:background "#460000" :box (:line-width 2 :color "#460000" :style released-button) :weight bold))))
+   '(comint-highlight-input ((t (:foreground "LightSkyBlue1" :weight bold))))
+   '(compilation-error ((t (:inherit font-lock-warning-face :foreground "red2"))))
+   '(compilation-line-number ((t (:foreground "orange red" :weight bold))))
+   '(cursor ((t (:background "green"))))
+   '(custom-variable-tag ((((class color) (background dark)) (:inherit variable-pitch :foreground "DarkOrange" :weight bold))))
+   '(default ((t (:inherit nil :stipple nil :background "#191935" :foreground "wheat1" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 98 :width normal :foundry "unknown" :family "DejaVu Sans Mono"))))
+   '(diff-added ((t (:foreground "lime green"))))
+   '(diff-removed ((t (:foreground "light coral"))))
+   '(dired-directory ((t (:foreground "sky blue"))))
+   '(dired-header ((t (:inherit font-lock-type-face :weight bold :height 1.2 :family "verdana"))))
+   '(dired-mark ((t (:inherit font-lock-constant-face :foreground "VioletRed4"))))
+   '(dired-marked ((t (:background "VioletRed4" :underline "green"))))
+   '(django-tag-face ((t (:background "#092e20" :box (:line-width 1 :color "grey22")))) t)
+   '(django-variable-face ((t (:foreground "#479dcc"))) t)
+   '(dropdown-list-face ((t (:inherit default :background "gray89" :foreground "black"))))
+   '(dropdown-list-selection-face ((t (:inherit dropdown-list :background "#6d1717"))))
+   '(ecb-analyse-face ((((class color) (background dark)) (:inherit ecb-default-highlight-face :background "DarkSlateBlue" :foreground "white"))))
+   '(ecb-default-highlight-face ((((class color) (background dark)) (:background "DarkSlateBlue" :foreground "white"))))
+   '(ecb-source-face ((((class color) (background dark)) (:inherit ecb-default-highlight-face :background "DeepSkyBlue" :foreground "white"))))
+   '(ecb-tag-header-face ((((class color) (background dark)) (:background "SeaGreen1" :foreground "black"))))
+   '(flymake-errline ((((class color)) (:background "#9d061f"))))
+   '(flymake-infoline ((t (:background "saddle brown"))))
+   '(flymake-warnline ((t (:underline "DarkSlateGray4"))))
+   '(font-lock-builtin-face ((((class color) (min-colors 88) (background dark)) (:foreground "green"))))
+   '(font-lock-comment-delimiter-face ((default (:inherit font-lock-comment-face)) (((class color) (min-colors 16)) nil)))
+   '(font-lock-comment-face ((t (:foreground "honeydew4" :slant italic :weight normal))))
+   '(font-lock-function-name-face ((t (:background "#530047" :foreground "gray77" :box (:line-width 2 :color "black" :style pressed-button) :weight bold))))
+   '(font-lock-keyword-face ((((class color) (min-colors 88) (background dark)) (:foreground "light grey"))))
+   '(font-lock-string-face ((t (:foreground "gold"))))
+   '(font-lock-warning-face ((((class color) (min-colors 88) (background dark)) (:foreground "PaleVioletRed3" :weight bold))))
+   '(helm-buffer-saved-out ((t (:foreground "red"))))
+   '(helm-ff-directory ((t (:inherit dired-directory))))
+   '(helm-ff-executable ((t (:foreground "green" :weight bold))))
+   '(helm-ff-invalid-symlink ((t (:inherit dired-symlink :strike-through "red"))))
+   '(helm-ff-symlink ((t (:inherit dired-symlink))))
+   '(helm-selection ((t (:inherit hl-line))))
+   '(helm-source-header ((t (:inherit font-lock-function-name-face))))
+   '(helm-visible-mark ((t (:background "dark green"))))
+   '(highlight ((t (:background "gray30"))))
+   '(highlight-changes ((((min-colors 88) (class color)) (:background "#00254a"))))
+   '(highlight-changes-delete ((((min-colors 88) (class color)) (:background "#8b6969"))))
+   '(hl-line ((t (:background "#082d3e"))))
+   '(ido-first-match ((t (:background "#193980" :foreground "gray66" :weight bold))))
+   '(ido-only-match ((t (:background "#15572c" :foreground "gray75" :weight bold))))
+   '(ido-subdir ((((min-colors 88) (class color)) (:weight bold))))
+   '(isearch ((t (:background "orange" :foreground "black"))))
+   '(jabber-chat-prompt-foreign ((t (:inherit custom-face-tag))))
+   '(jabber-chat-prompt-local ((t (:inherit org-level-4))))
+   '(jabber-roster-user-online ((t (:inherit font-lock-string-face))))
+   '(lazy-highlight ((((class color) (min-colors 88) (background dark)) (:background "darkgreen" :foreground "black"))))
+   '(linum ((t (:background "#16103a" :foreground "#747474" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant italic :weight normal :height 0.9))))
+   '(match ((((class color) (min-colors 88) (background dark)) (:background "#971d5c"))))
+   '(message-cited-text ((((class color) (background dark)) (:foreground "SandyBrown"))))
+   '(message-header-name ((((class color) (background dark)) (:foreground "DarkGrey"))))
+   '(message-header-other ((((class color) (background dark)) (:foreground "LightPink2"))))
+   '(message-header-subject ((((class color) (background dark)) (:foreground "yellow2"))))
+   '(message-separator ((((class color) (background dark)) (:foreground "thistle"))))
+   '(minibuffer-prompt ((((background dark)) (:foreground "gold2" :weight bold))))
+   '(mode-line ((t (:background "grey75" :foreground "black" :box (:line-width -1 :style released-button) :slant normal :weight normal :height 1.0 :width condensed :foundry "unknown" :family "terminus"))))
+   '(mode-line-inactive ((t (:inherit mode-line :background "dark slate" :foreground "grey80" :box (:line-width -1 :color "grey40") :weight light))))
+   '(mumamo-background-chunk-major ((((class color) (min-colors 88) (background dark)) (:background "#123a4d"))))
+   '(mumamo-background-chunk-submode1 ((((class color) (min-colors 88) (background dark)) (:background "#2e2e51"))))
+   '(notmuch-hello-logo-background ((t (:background "#2f4f4f"))))
+   '(notmuch-message-summary-face ((t (:inherit font-lock-function-name-face))))
+   '(notmuch-search-count ((t (:inherit default :foreground "yellow3"))))
+   '(notmuch-search-date ((t (:inherit default :foreground "SpringGreen4"))))
+   '(notmuch-search-subject ((t (:foreground "dark turquoise"))))
+   '(org-agenda-clocking ((t (:foreground "DarkGoldenrod2"))) t)
+   '(org-agenda-done ((t (:foreground "dark gray" :strike-through "coral"))))
+   '(org-archived ((t (:foreground "LemonChiffon4"))))
+   '(org-column-title ((t (:background "dodgerblue4" :underline t :weight bold :height 113 :foundry "unknown" :family "DejaVu Sans Mono"))))
+   '(org-date ((t (:foreground "dark orange" :underline t :weight bold))))
+   '(org-done ((t (:foreground "cornsilk4" :strike-through t :weight normal))))
+   '(org-habit-alert-face ((((background dark)) (:background "gold" :foreground "red3"))))
+   '(org-headline-done ((((class color) (min-colors 16) (background dark)) (:foreground "dim gray" :strike-through t))))
+   '(org-hide ((((background dark)) (:foreground "darkslategrey"))))
+   '(org-level-1 ((t (:foreground "LightSteelBlue2"))))
+   '(org-level-2 ((((class color) (min-colors 16) (background dark)) (:foreground "RosyBrown2"))))
+   '(org-level-4 ((((class color) (min-colors 88) (background dark)) (:foreground "darkgoldenrod3"))))
+   '(org-link ((t (:foreground "DarkGoldenrod1" :underline "IndianRed3" :weight bold))))
+   '(org-mode-line-clock ((t (:inherit modeline :foreground "hot pink" :weight bold))) t)
+   '(org-scheduled ((t (:foreground "thistle4" :slant italic))))
+   '(org-scheduled-previously ((t (:foreground "indian red"))))
+   '(org-scheduled-today ((t (:foreground "SeaGreen3" :slant italic))))
+   '(org-todo ((t (:foreground "forest green" :weight bold))))
+   '(org-upcoming-deadline ((t (:foreground "hot pink"))))
+   '(outline-3 ((t (:foreground "seashell3"))))
+   '(outline-7 ((t (:foreground "chartreuse"))))
+   '(py-XXX-tag-face ((t (:background "medium violet red" :foreground "white"))) t)
+   '(py-builtins-face ((t (:foreground "medium sea green"))) t)
+   '(py-class-name-face ((t (:foreground "deep sky blue"))) t)
+   '(py-decorators-face ((t (:foreground "cyan4"))) t)
+   '(py-pseudo-keyword-face ((t (:foreground "RosyBrown3"))) t)
+   '(region ((t (:background "#5b1737"))))
+   '(rst-level-1-face ((t (:background "SlateBlue4"))) t)
+   '(rst-level-2-face ((t (:background "grey20"))) t)
+   '(secondary-selection ((t (:background "forest green" :foreground "white"))))
+   '(shadow ((((class color grayscale) (min-colors 88) (background dark)) (:foreground "grey40"))))
+   '(show-paren-match ((t (:foreground "deep sky blue" :inverse-video t))))
+   '(smerge-refined-change ((t (:background "midnight blue"))))
+   '(tabbar-default ((t (:inherit variable-pitch :background "gray75" :foreground "MidNightBlue" :family "verdana"))))
+   '(tabbar-selected ((t (:inherit tabbar-default :foreground "red4" :family "verdana"))))
+   '(tooltip ((((class color)) (:inherit variable-pitch :background "IndianRed1" :foreground "black"))))
+   '(trailing-whitespace ((t (:background "#182749"))))
+   '(which-func ((((class color) (min-colors 88) (background dark)) (:foreground "dark red"))))
+   '(whitespace-empty ((t (:background "gray33"))))
+   '(whitespace-line ((t (:foreground "DarkOrange1"))))
+   '(whitespace-space ((((class color) (background dark)) (:foreground "gray40"))))
+   '(whitespace-tab ((t (:background "#032251"))))
+   '(widget-button ((t (:inherit font-lock-keyword-face))))
+   '(fringe ((t (:background "#0f1a39" :foreground "yellow"))))
+   )
+  (mode-line-faces-dark)
+  (fn-anonymous-130)
+)

configs/cfg_dired.el

 (add-hook 'dired-mode-hook 'avk-dired-mode-hook)
 
 (custom-set-variables)
-(custom-set-faces
- '(dired-marked ((t (:background "VioletRed4" :underline "green"))))
- '(dired-mark ((t (:inherit font-lock-constant-face :foreground "VioletRed4"))))
- '(dired-directory ((t (:foreground "sky blue")))))
+(custom-set-faces)

configs/cfg_duplicate_line.el

+; I like this variation from
+; http://stackoverflow.com/questions/88399/how-do-i-duplicate-a-whole-line-in-emacs
+; because: it does not uses kill ring
+
+(defun jr-duplicate-line ()
+  "EASY"
+  (interactive)
+  (save-excursion
+    (let ((line-text (buffer-substring-no-properties
+		      (line-beginning-position)
+		      (line-end-position))))
+      (move-end-of-line 1)
+      (newline)
+      (insert line-text))))
+(global-set-key [(control =)] 'jr-duplicate-line)
+
+

configs/cfg_flymake.el

 ;; add this to your .emacs file:
 
+
+(defun flymake-create-temp-intemp (file-name prefix)
+  "Return file name in temporary directory for checking FILE-NAME.
+This is a replacement for `flymake-create-temp-inplace'. The
+difference is that it gives a file name in
+`temporary-file-directory' instead of the same directory as
+FILE-NAME.
+
+For the use of PREFIX see that function.
+
+Note that not making the temporary file in another directory
+\(like here) will not if the file you are checking depends on
+relative paths to other files \(for the type of checks flymake
+makes)."
+  (unless (stringp file-name)
+    (error "Invalid file-name"))
+  (or prefix
+      (setq prefix "flymake"))
+  (let* ((name (concat
+                (file-name-nondirectory
+                 (file-name-sans-extension file-name))
+                "_" prefix))
+         (ext  (concat "." (file-name-extension file-name)))
+         (temp-name (make-temp-file name nil ext))
+         )
+    (flymake-log 3 "create-temp-intemp: file=%s temp=%s"
+   file-name temp-name)
+    temp-name))
+
+
 ;; to add CSS support, follow: http://csslint.net/about.html
 
 ;; a combination from AVK
     (add-to-list 'flymake-allowed-file-name-masks
 		 '("\\.py\\'" flymake-pyflakes-init)))
 
+
+(when (load "flymake" t)
+  (defun flymake-pyflakes-init ()
+    (let* ((temp-file (flymake-init-create-temp-buffer-copy
+         'flymake-create-temp-intemp))
+    (local-file (file-relative-name
+   temp-file
+   (file-name-directory buffer-file-name))))
+      (flymake-log 3 "flymake-pyflakes-init: dir=%s %s"
+     buffer-file-name (file-name-directory temp-file))
+      (list "~/.emacs.d/pyflymake.py" (list local-file)
+     (file-name-directory temp-file))))
+
+  (add-to-list 'flymake-allowed-file-name-masks
+        '("\\.py\\'" flymake-pyflakes-init)))
+
+;;(add-hook 'find-file-hook 'flymake-find-file-hook)
+
+
 ;; (when (load "flymake" t)
 ;;   (defun flymake-pylint-init (&optional trigger-type)
 ;;     (let* ((temp-file (flymake-init-create-temp-buffer-copy
 (custom-set-variables
  '(flymake-run-in-place nil)
  '(flymake-log-level 0))
-(custom-set-faces
- '(flymake-warnline ((t (:underline "DarkSlateGray4"))))
- '(flymake-infoline ((t (:background "#4a0e3f"))))
- '(flymake-errline ((((class color)) (:background "#9d061f")))))
+(custom-set-faces)
 

configs/cfg_font-lock.el

-
-
-(custom-set-faces
- '(font-lock-warning-face ((((class color) (min-colors 88) (background dark)) (:foreground "PaleVioletRed3" :weight bold))))
- '(font-lock-string-face ((t (:foreground "OliveDrab2"))))
- '(font-lock-keyword-face ((((class color) (min-colors 88) (background dark)) (:foreground "light grey"))))
- '(font-lock-function-name-face ((t (:background "#000062" :foreground "dark grey" :inverse-video t :box (:line-width 2 :color "grey75" :style released-button) :weight bold))))
- '(font-lock-comment-face ((t (:foreground "honeydew4" :slant italic :weight normal))))
- '(font-lock-comment-delimiter-face ((default (:inherit font-lock-comment-face)) (((class color) (min-colors 16)) nil)))
- '(font-lock-builtin-face ((((class color) (min-colors 88) (background dark)) (:foreground "gree
-n"))))
- '(ecb-default-highlight-face ((((class color) (background dark)) (:background "DarkSlateBlue" :foreground "white")))))
-
-
+(custom-set-faces)
 
 (custom-set-variables
  '(wl-default-folder "%INBOX:alex@halogen.kharkov.ua@mail")

configs/cfg_frame_title.el

+; http://www.emacswiki.org/emacs/FrameTitle
+(setq frame-title-format '("" invocation-name "@" system-name ":"
+      " %b "))

configs/cfg_helm.el

 (global-set-key [M-f3] 'helm-find-files)
 (global-set-key [M-f9] 'helm-mark-ring)
 (global-set-key [M-f12] 'helm-resume)
+(global-set-key (kbd "C-z C-r") 'helm-recentf)
+
 ; (helm-dired-bindings 1)

configs/cfg_ido-mode.el

 
 
 (custom-set-faces
- '(ido-subdir ((((min-colors 88) (class color)) (:weight bold))))
- '(ido-only-match ((t (:background "#15572c" :foreground "gray75" :weight bold))))
- '(ido-first-match ((t (:background "#193980" :foreground "gray66" :weight bold)))))
+ )
 
 (custom-set-variables
  '(ido-work-directory-list-ignore-regexps (quote (".*")))

configs/cfg_jabber_example.el

+(require 'jabber-autoloads)
+
+(defun set-jabber-mode-line()
+  (interactive)
+  (custom-set-variables
+   '(jabber-mode-line-mode t)
+   '(jabber-mode-line-compact t)
+   ))
+
+(global-set-key (kbd "C-x C-j m") 'set-jabber-mode-line)
+
+
+(custom-set-variables
+ '(jabber-username "alex")
+ '(jabber-use-global-history nil)
+ '(jabber-socks5-proxies (quote ("proxy.jab.ua2web.com:7778")))
+ '(jabber-mode-line-mode t)
+ '(jabber-mode-line-compact t)
+ '(jabber-history-size-limit 1001024)
+ '(jabber-history-enabled t)
+ '(jabber-connection-ssl-program (quote openssl)))
+
+(custom-set-faces
+ )

configs/cfg_keybindings.el

 
 
 
-;; Duplicate it
-(defun duplicate()
- "Duplicate it."
- (interactive)
- (let (
-       (beg (line-beginning-position))
-       (end (line-end-position)))
-   (copy-region-as-kill beg end)
-   (beginning-of-line)
-   (forward-line 1)
-   (yank)
-   (newline)
-   (forward-line -1)))
 
 
 
 
 (global-set-key [(control <)] 'previous-buffer)
 (global-set-key [(control >)] 'next-buffer)
-(global-set-key (kbd "C-x TAB") "    ")
+;(global-set-key (kbd "C-x TAB") "    ")
 (global-set-key (kbd "C-x x") [?\C-  ?\M-f ?\C-w])
 
 
 ; 
 (global-set-key (kbd "C-` qp") 'sql-postgres)
 (global-set-key (kbd "C-` qm") 'sql-mysql)
-(global-set-key [(control kp-add)] 'duplicate)
 (global-set-key (kbd "C-` p") 'proced)
 (global-set-key (kbd "C-c t") 'proced)
 
 
 (define-key global-map  "\C-zd"         'delete-whitespace-rectangle)
 
+(define-key global-map  "\C-c'"         'electric-pair-mode)
+
+
 ; justify
 (fset 'justify-region
    [menu ?s ?e ?t ?- ?j ?u ?s ?t tab return ?f tab return])
 (define-key global-map  "\C-xj"         'justify-region)
+
+
+(fset 'redmine-pre
+    [?\s-  ?* ?s ?c ?r ?a ?n ?t ?c ?h backspace backspace backspace backspace ?t ?c ?g backspace ?h ?* return C-end return ?< ?p ?r ?e ?> ?\C-y ?< ?/ ?p ?r ?e ?> ?\C-r ?< ?p ?r ?e ?\C-  ?\C-e C-end ?\C-w C-tab])
+(define-key global-map  "\C-cpr"         'redmine-pre)

configs/cfg_mode-line.el

                         'mode-line-position-face)))
    ; emacsclient [default -- keep?]
    mode-line-client
-   "  "
+   " (%p) "
    ; read-only or modified status
    (:eval
     (cond (buffer-read-only
           (t "      ")))
    "    "
    ; directory and buffer/file name
+   "%Z"
+
    (:propertize (:eval (shorten-directory default-directory 30))
                 face mode-line-folder-face)
    (:propertize "%b"
                 face mode-line-filename-face)
    ; narrow [default -- keep?]
    " %n "
+
    ; mode indicators: vc, recursive edit, major mode, minor modes, process, global
    (vc-mode vc-mode)
    "  %["
 (make-face 'mode-line-process-face)
 (make-face 'mode-line-80col-face)
 
-(set-face-attribute 'mode-line nil
-    :foreground "gray90" :background "#1a3131"
-    :inverse-video nil
-    :box '(:line-width 6 :color "#1a3131" :style nil))
+(defun mode-line-faces-light()
+  (interactive)
 
-(set-face-attribute 'mode-line-inactive nil
-    :foreground "gray60" :background "gray20"
-    :inverse-video nil
-    :box '(:line-width 6 :color "gray20" :style nil))
+  (set-face-attribute 'mode-line nil
+		      :foreground "black" :background "#d0e5cc"
+		      :inverse-video nil
+		      :box '(:line-width 6 :color "#d0e5cc" :style nil))
 
-(set-face-attribute 'mode-line-read-only-face nil
-    :foreground "cyan3"
-    :box '(:line-width 2 :color "cyan3"))
+  (set-face-attribute 'mode-line-inactive nil
+		      :foreground "black" :background "SlateGray2"
+		      :inverse-video nil
+		      :box '(:line-width 6 :color "SlateGray2" :style nil))
 
-(set-face-attribute 'mode-line-modified-face nil
-    :foreground "white smoke"
-    :background "#007400"
-    :box '(:line-width 2 :color "chartreuse3"))
+  (set-face-attribute 'mode-line-read-only-face nil
+		      :foreground "Firebrick"
+		      :weight 'bold
+		      :box '(:line-width 2 :color "MediumBlue"))
 
-(set-face-attribute 'mode-line-folder-face nil
-    :foreground "gray60")
+  (set-face-attribute 'mode-line-modified-face nil
+		      :foreground "dark red"
+		      :background "#d0e5cc"
+		      :height 150
+		      :weight 'bold
+		      :box '(:line-width 2 :color "#4177b8"))
 
-(set-face-attribute 'mode-line-filename-face nil
-    :foreground "#eab700"
-    :weight 'bold)
+  (set-face-attribute 'mode-line-folder-face nil
+		      :foreground "gray30")
 
-(set-face-attribute 'mode-line-position-face nil
-    :family "Menlo" :height 100)
+  (set-face-attribute 'mode-line-filename-face nil
+		      :foreground "dark green"
+		      :weight 'bold)
 
-(set-face-attribute 'mode-line-mode-face nil
-    :foreground "gray80")
+  (set-face-attribute 'mode-line-position-face nil
+		      :family "Menlo" :height 100)
 
-(set-face-attribute 'mode-line-minor-mode-face nil
-    :foreground "gray40"
-    :height 110)
+  (set-face-attribute 'mode-line-mode-face nil
+		      :weight 'bold
+		      :foreground "RoyalBlue")
 
-(set-face-attribute 'mode-line-process-face nil
-    :foreground "LimeGreen")
+  (set-face-attribute 'mode-line-minor-mode-face nil
+		      :foreground "DarkSlateBlue"
+		      :height 110)
 
-(set-face-attribute 'mode-line-80col-face nil
-    :inherit 'mode-line-position-face
-    :foreground "black" :background "#eab700")
+  (set-face-attribute 'mode-line-process-face nil
+		      :foreground "LimeGreen")
+
+  (set-face-attribute 'mode-line-80col-face nil
+		      :inherit 'mode-line-position-face
+		      :foreground "black" :background "#eab700")
+  )
+
+
+
+(defun mode-line-faces-dark()
+  (interactive)
+  (set-face-attribute 'mode-line nil
+		      :foreground "gray90" :background "#12483d"
+		      :inverse-video nil
+		      :box '(:line-width 6 :color "#12483d" :style nil))
+
+
+  (set-face-attribute 'mode-line-inactive nil
+		      :foreground "gray60" :background "gray22"
+		      :inverse-video nil
+		      :box '(:line-width 6 :color "gray22" :style nil))
+
+
+  (set-face-attribute 'mode-line-read-only-face nil
+		      :foreground "cyan3"
+		      :box '(:line-width 2 :color "cyan3"))
+
+  (set-face-attribute 'mode-line-modified-face nil
+		      :foreground "white smoke"
+		      :background "#007400"
+		      :box '(:line-width 2 :color "chartreuse3"))
+
+  (set-face-attribute 'mode-line-folder-face nil
+		      :foreground "gray60")
+
+  (set-face-attribute 'mode-line-filename-face nil
+		      :foreground "#eab700"
+		      :weight 'bold)
+
+  (set-face-attribute 'mode-line-position-face nil
+		      :family "Menlo" :height 100)
+
+  (set-face-attribute 'mode-line-mode-face nil
+		      :foreground "gray80")
+
+  (set-face-attribute 'mode-line-minor-mode-face nil
+		      :foreground "gray40"
+		      :height 110)
+
+  (set-face-attribute 'mode-line-process-face nil
+		      :foreground "LimeGreen")
+
+  (set-face-attribute 'mode-line-80col-face nil
+		      :inherit 'mode-line-position-face
+		      :foreground "black" :background "#eab700")
+  )

configs/cfg_notmuch.el

   "mark message as deleted"
   (interactive)
   (notmuch-search-tag '("+deleted" "-inbox")))
+
+(defun notmuch-show-tag-read ()
+  "mark message as read"
+  (interactive)
+  (notmuch-search-tag '("-unread"))
+  (down)
+)
+
 (define-key notmuch-search-mode-map "d" 'notmuch-show-tag-deleted)
+(define-key notmuch-search-mode-map "~" 'notmuch-show-tag-read)
+(define-key notmuch-search-mode-map "`" 'notmuch-show-tag-read)
 
 (require 'org-notmuch)
 
  '(notmuch-message-headers (quote ("Subject" "To" "Cc" "Date" "X-Mailer" "User-Agent")))
  '(notmuch-fcc-dirs "ua2web/sent"))
 (custom-set-faces
- '(notmuch-search-subject ((t (:foreground "dark turquoise"))))
- '(notmuch-search-date ((t (:inherit default :foreground "SpringGreen4"))))
- '(notmuch-search-count ((t (:inherit default :foreground "yellow3"))))
- '(notmuch-message-summary-face ((t (:inherit font-lock-function-name-face))))
- '(notmuch-hello-logo-background ((t (:background "#2f4f4f")))))
+)

configs/cfg_orgmode.el

 
 (setq org-todo-keyword-faces
       '(
-	("WORKING" . (:foreground "yellow" :weight bold))
-	("DELEGATE" . (:foreground "deep sky blue" :background "#032251" :weight normal))
-	("DELEGATED" . (:foreground "LightSteelBlue" :background "#032251" :weight normal))
-	("TOCHECK" . (:foreground "light coral" :background "#032251" :weight normal))
-	("TOPAIR" . (:foreground "wheat" :background "#032251" :weight normal))
-	("ASSIGNED" . (:foreground "green yellow" :background "#032251" :weight normal))
+	("WORKING" . (:background "green yellow"))
+	("TODO" . (:foreground "DarkSlateBlue" :weight bold))
+	("DELEGATE" . (:foreground "black" :background "LightSeaGreen" :weight normal :slant italic))
+	("DELEGATED" . (:foreground "DarkSlateBlue" :weight bold :slant italic))
+	("TOCHECK" . (:foreground "black" :background "LightGoldenrod" :weight normal :slant italic))
+	("TOPAIR" . (:foreground "black" :background "PaleTurquoise" :weight normal :slant italic))
+	("ASSIGNED" . (:foreground "black" :background "Yellow" :weight normal :slant italic))
 	("CANCELLED" . (:foreground "white" :background "dark red" :weight bold :strike-through "coral"))
 	)
       )
 ;; 		      )))
 ;; 	)))
 
+(defun insert-time-with-seconds ()
+  (interactive)
+  (insert (format-time-string "%H:%M.%S")))
+
+
+(global-set-key "\C-c0" 'insert-time-with-seconds)
 
 (custom-set-variables
  '(wl-organization "Halogen D.G.")
- '(org-todo-keywords (quote ((sequence "TODO(t!)" "WORKING(w!)" "SLEEP(s@!)" "|" "DONE(x!)") (sequence "DELEGATE(s=!)" "DELEGATED(1!)" "FEEDBACK(f!)" "ASSIGNED(a!)" "TOCHECK(k!)" "TOPAIR(p!)" "|" "CONFIRMED(o!)") (sequence "DUP(d!)" "UNCLEAR(u!)" "DONE(x!)") (sequence "|" "CANCELLED(c@!)"))))
+ '(org-todo-keywords (quote ((sequence "TODO(t!)" "WORKING(w!)" "SLEEP(s@!)" "|" "DONE(x!)") (sequence "DELEGATE(e=!)" "DELEGATED(1!)" "FEEDBACK(f!)" "ASSIGNED(a!)" "TOCHECK(k!)" "TOPAIR(p!)" "|" "CONFIRMED(o!)") (sequence "DUP(d!)") (sequence "|" "CANCELLED(c@!)") (sequence "UNCLEAR(u!)") (sequence "REJECTED(r!)"))))
  '(org-time-stamp-rounding-minutes (quote (5 5)))
  '(org-replace-disputed-keys t)
+ '(org-priority-faces (quote ((65 . "red"))))
  '(org-log-redeadline (quote time))
  '(org-log-into-drawer t)
  '(org-log-done (quote time))
 </style>")
  '(org-directory "~/org")
  '(org-clock-modeline-total (quote current))
- '(org-capture-templates (quote (("t" "Todo" entry (file+headline "~/org/notes.org" "Unsorted Tasks") "* %?
+ '(org-capture-templates (quote (("t" "Todo" entry (file+headline "~/org/notes.org" "Unsorted Tasks") "* TODO %?
   %i
   %a") ("j" "Journal" entry (file+datetree "~/org/journal.org") "* %?
 Entered on %U
   %i
-  %a") ("c" "Comment on project code" entry (file+headline "~/org/notes.org" "Code") "* %?
+  %a") ("c" "Comment on project code" entry (file+headline "~/org/notes.org" "Code") "* TODO %?
   %i
   %a") ("m" "Money log" entry (file+datetree+prompt "~/org/money.org") "* %?
 Entered on %U
  '(org-agenda-skip-scheduled-if-deadline-is-shown nil)
  '(org-agenda-files (quote ("~/org/work.org" "~/org/avk.org" "~/org/notes.org" "~/CData/hdgshare.org" "~/org/journal.org")))
  '(org-agenda-custom-commands (quote (("p" . "Project TODOs") ("py" "Yacapaca" tags-todo "YP" nil) ("pt" "Tagvillage" tags-todo "tgv" nil) ("pb" "BonjourParis" tags-todo "BP" nil) ("pm" "Miles" tags-todo "miles" nil) ("p2" "UA2WEB" tags-todo "ua2web" nil) ("kevin" "Kevin Feltner" tags "kevin" nil) ("P" "projects GTD Block Agenda" ((tags-todo "YP" nil) (tags-todo "tgv" nil) (tags-todo "BP" nil) (tags-todo "miles" nil) (tags-todo "ua2web" nil) (tags-todo "taxi" nil)) nil ("~/next-actions.html")) ("1" "AVK Custom Plan" ((agenda "" ((org-agenda-overriding-header "My Today Plan (AVK)") (org-agenda-span (quote day)))) (todo "WORKING" nil) (todo "TOPAIR" nil) (todo "TOCHECK" nil)) nil nil)))))
-(custom-set-faces
- '(org-upcoming-deadline ((((class color) (min-colors 88) (background dark)) (:foreground "indian red"))))
- '(org-todo ((t (:foreground "forest green" :weight bold))))
- '(org-scheduled-today ((t (:foreground "SeaGreen3" :slant italic))))
- '(org-scheduled-previously ((t (:foreground "firebrick3"))))
- '(org-scheduled ((t (:foreground "thistle4" :slant italic))))
- '(org-mode-line-clock ((t (:inherit modeline :foreground "chocolate1" :weight bold))) t)
- '(org-link ((t (:foreground "DarkGoldenrod1" :underline "IndianRed3" :weight bold))))
- '(org-level-4 ((((class color) (min-colors 88) (background dark)) (:foreground "darkgoldenrod3"))))
- '(org-level-2 ((((class color) (min-colors 16) (background dark)) (:foreground "RosyBrown2"))))
- '(org-level-1 ((t (:foreground "LightSteelBlue2"))))
- '(org-hide ((((background dark)) (:foreground "darkslategrey"))))
- '(org-headline-done ((((class color) (min-colors 16) (background dark)) (:foreground "dim gray" :strike-through t))))
- '(org-habit-alert-face ((((background dark)) (:background "gold" :foreground "red3"))))
- '(org-done ((t (:foreground "cornsilk4" :strike-through t :weight normal))))
- '(org-date ((t (:foreground "plum" :underline t))))
- '(org-column-title ((t (:background "dodgerblue4" :underline t :weight bold :height 113 :foundry "unknown" :family "DejaVu Sans Mono"))))
- '(org-archived ((t (:foreground "LemonChiffon4"))))
- '(org-agenda-done ((t (:foreground "dark gray" :strike-through "coral"))))
- '(org-agenda-clocking ((t (:inherit secondary-selection :background "darkgreen" :box (:line-width 2 :color "green4" :style released-button)))) t))
+;; (custom-set-faces
+;;  '(org-upcoming-deadline ((((class color) (min-colors 88) (background dark)) (:foreground "indian red"))))
+;;  '(org-todo ((t (:foreground "forest green" :weight bold))))
+;;  '(org-scheduled-today ((t (:foreground "SeaGreen3" :slant italic))))
+;;  '(org-scheduled-previously ((t (:foreground "firebrick3"))))
+;;  '(org-scheduled ((t (:foreground "thistle4" :slant italic))))
+;;  '(org-mode-line-clock ((t (:inherit modeline :foreground "chocolate1" :weight bold))) t)
+;;  '(org-link ((t (:foreground "DarkGoldenrod1" :underline "IndianRed3" :weight bold))))
+;;  '(org-level-4 ((((class color) (min-colors 88) (background dark)) (:foreground "darkgoldenrod3"))))
+;;  '(org-level-2 ((((class color) (min-colors 16) (background dark)) (:foreground "RosyBrown2"))))
+;;  '(org-level-1 ((t (:foreground "LightSteelBlue2"))))
+;;  '(org-hide ((((background dark)) (:foreground "darkslategrey"))))
+;;  '(org-headline-done ((((class color) (min-colors 16) (background dark)) (:foreground "dim gray" :strike-through t))))
+;;  '(org-habit-alert-face ((((background dark)) (:background "gold" :foreground "red3"))))
+;;  '(org-done ((t (:foreground "cornsilk4" :strike-through t :weight normal))))
+;;  '(org-date ((t (:foreground "plum" :underline t))))
+;;  '(org-column-title ((t (:background "dodgerblue4" :underline t :weight bold :height 113 :foundry "unknown" :family "DejaVu Sans Mono"))))
+;;  '(org-archived ((t (:foreground "LemonChiffon4"))))
+;;  '(org-agenda-done ((t (:foreground "dark gray" :strike-through "coral"))))
+;;  '(org-agenda-clocking ((t (:inherit secondary-selection :background "darkgreen" :box (:line-width 2 :color "green4" :style released-button)))) t))
+
+(custom-set-faces)

configs/cfg_passwords.el

+; from http://stackoverflow.com/questions/840279/passwords-in-emacs-tramp-mode-editing
+
+(require 'password-cache)
+(setq password-cache-expiry nil)

configs/cfg_python.el

   "{% trans '" _ "' %}")
 (define-key global-map  "\C-xt"         'django-trans)
 
+(define-skeleton redmine-pre-python-class
+  "redmine pre for region"
+  nil
+  "<pre><code class=\"python\">" _ "</code></pre>")
+(define-key global-map  "\C-cpp"         'redmine-pre-python-class)
+
+
 ;; (define-skeleton django-trans-str
 ;;   "django translate string"
 ;;   nil

configs/cfg_recentf.el

 (custom-set-variables
  '(recentf-save-file "~/.emacs-recentf")
  '(recentf-mode t nil (recentf))
- '(recentf-max-saved-items 50)
+ '(recentf-max-saved-items 100)
  '(recentf-auto-cleanup (quote never)))
 (custom-set-faces)
 (global-set-key "\C-x\ \C-r" 'recentf-open-files)

configs/cfg_scroll.el

+;; avoid jumping during scroll
+
+(setq scroll-step 1)
+(setq scroll-conservatively 10000)
+(setq auto-window-vscroll nil)

configs/cfg_tabbar.el

 
 (custom-set-variables)
 (custom-set-faces
- '(tabbar-selected ((t (:inherit tabbar-default :foreground "red4" :family "verdana"))))
- '(tabbar-default ((t (:inherit variable-pitch :background "gray75" :foreground "MidNightBlue" :family "verdana")))))
+ )
 ;;; flymake.el --- a universal on-the-fly syntax checker
 
-;; Copyright (C) 2003-2012  Free Software Foundation, Inc.
+;; Copyright (C) 2003-2012 Free Software Foundation, Inc.
 
 ;; Author:  Pavel Kobyakov <pk_at_work@yahoo.com>
 ;; Maintainer: Sam Graham <libflymake-emacs BLAHBLAH illusori.co.uk>
-;; Version: 0.4.6
+;; Version: 0.4.16
 ;; Keywords: c languages tools
 
 ;; This file is part of GNU Emacs.
   "Non-nil if syntax check was killed by `flymake-compile'.")
 (make-variable-buffer-local 'flymake-check-was-interrupted)
 
+(defvar flymake-check-should-restart nil
+  "Non-nil if syntax check should restart after terminating.")
+(make-variable-buffer-local 'flymake-check-should-restart)
+
 (defvar flymake-err-info nil
   "Sorted list of line numbers and lists of err info in the form (file, err-text).")
 (make-variable-buffer-local 'flymake-err-info)
 
 ;;;###autoload
 (define-minor-mode flymake-mode
-  "Minor mode to do on-the-fly syntax checking.
-When called interactively, toggles the minor mode.
-With arg, turn Flymake mode on if and only if arg is positive."
+  "Toggle on-the-fly syntax checking.
+With a prefix argument ARG, enable the mode if ARG is positive,
+and disable it otherwise.  If called from Lisp, enable the mode
+if ARG is omitted or nil."
   :group 'flymake :lighter flymake-mode-line
   (cond
 
                      (not flymake-timer))
             (setq flymake-timer (run-at-time nil 1 'flymake-on-timer-event)))
 
-          (when flymake-start-syntax-check-on-find-file
-            (flymake-start-syntax-check)))))
+          (when (and flymake-start-syntax-check-on-find-file
+                     ;; Since we write temp files in current dir, there's no point
+                     ;; trying if the directory is read-only (bug#8954).
+                     (or (not flymake-run-in-place)
+                         (file-writable-p (file-name-directory buffer-file-name)))
+                     (file-readable-p (file-name-directory buffer-file-name)))
+            (with-demoted-errors
+              (flymake-start-syntax-check))))))
 
     ;; Turning the mode OFF.
     (t
     ("\\.tex\\'" flymake-simple-tex-init)
     ("\\.idl\\'" flymake-simple-make-init)
     ("\\.spec\\'" flymake-specfile-init)
+    ("\\.po\\'" flymake-pofile-init)
     ;; ("\\.cpp\\'" 1)
     ;; ("\\.java\\'" 3)
     ;; ("\\.h\\'" 2 ("\\.cpp\\'" "\\.c\\'")
   (or (flymake-get-buildfile-from-cache source-dir-name)
       (let* ((file (locate-dominating-file source-dir-name buildfile-name)))
         (if file
-            (progn
+            (let* ((file (file-truename file)))
               (flymake-log 3 "found buildfile at %s" file)
               (flymake-add-buildfile-to-cache source-dir-name file)
               file)
 
                 (flymake-parse-residual)
                 (flymake-post-syntax-check exit-status command)
-                (setq flymake-is-running nil))))
+                (setq flymake-is-running nil)
+                (when flymake-check-should-restart
+                  (flymake-log 2 "restarting syntax check")
+                  (flymake-start-syntax-check)))))
         (error
          (let ((err-str (format "Error in process sentinel for buffer %s: %s"
                                 source-buffer (error-message-string err))))
      ;; LaTeX warnings (fileless) ("\\(LaTeX \\(Warning\\|Error\\): .*\\) on input line \\([0-9]+\\)" 20 3 nil 1)
      ;; gcc after 4.5 (includes column number)
      (" *\\(\\([a-zA-Z]:\\)?[^:(\t\n]+\\)\:\\([0-9]+\\)\:\\([0-9]+\\)\:[ \t\n]*\\(.+\\)"
-      2 3 4 5)
+      1 3 4 5)
      ;; ant/javac, also matches gcc prior to 4.5
      (" *\\(\\[javac\\] *\\)?\\(\\([a-zA-Z]:\\)?[^:(\t\n]+\\)\:\\([0-9]+\\)\:[ \t\n]*\\(.+\\)"
       2 4 nil 5))
         (flymake-clear-project-include-dirs-cache)
 
         (setq flymake-check-was-interrupted nil)
+        (setq flymake-check-should-restart nil)
 
         (let* ((source-file-name  buffer-file-name)
                (init-f (flymake-get-init-function source-file-name))
         (setq flymake-check-was-interrupted t))))
   (flymake-log 1 "killed process %d" (process-id proc)))
 
+(defun flymake-stop-syntax-check (&optional buffer)
+  "Kill any queued or running syntax check for BUFFER.
+Defaults to `current-buffer' if not supplied.
+
+NOTE: Stopping a syntax check will not complete until the spawned process has
+been terminated, this happens asynchronously and it is highly likely that
+immediately after calling `flymake-stop-syntax-check' the process will still
+be running. Among other things, this will prevent starting a new syntax check
+in the buffer until the process terminates. If you want to queue up a new
+syntax check, you should look at `flymake-restart-syntax-check' which handles
+this async delay correctly for you."
+  (interactive)
+  (let ((buffer (or buffer (current-buffer))))
+    (flymake-remove-queued-syntax-check buffer)
+    (dolist (proc flymake-processes)
+      (if (equal (process-buffer proc) buffer) (flymake-kill-process proc)))))
+
 (defun flymake-stop-all-syntax-checks ()
   "Kill all syntax check processes."
   (interactive)
   (while flymake-processes
     (flymake-kill-process (pop flymake-processes))))
 
+(defun flymake-restart-syntax-check (&optional buffer)
+  "Kill any queued or running syntax check for BUFFER and start a new one.
+Defaults to `current-buffer' if not supplied."
+  (interactive)
+  (let ((buffer (or buffer (current-buffer))))
+    (flymake-remove-queued-syntax-check buffer)
+    (dolist (proc flymake-processes)
+      (when (equal (process-buffer proc) buffer)
+        (with-current-buffer buffer
+          (setq flymake-check-should-restart t))
+        (flymake-kill-process proc)))))
+
 (defun flymake-compilation-is-running ()
   (and (boundp 'compilation-in-progress)
        compilation-in-progress))
     (error "Invalid file-name"))
   (or prefix
       (setq prefix "flymake"))
-  (let* ((temp-name   (concat (file-name-sans-extension file-name)
-                              "_" prefix
-                              (and (file-name-extension file-name)
-                                   (concat "." (file-name-extension file-name))))))
+  (let* ((temp-name (file-truename (concat (file-name-sans-extension file-name)
+                                           "_" prefix
+                                           (and (file-name-extension file-name)
+                                                (concat "." (file-name-extension file-name)))))))
     (flymake-log 3 "create-temp-inplace: file=%s temp=%s" file-name temp-name)
     temp-name))
 
                  (file-name-nondirectory (file-name-sans-extension file-name))
                  "_" prefix))
          (ext  (concat "." (file-name-extension file-name)))
-         (temp-name (make-temp-file name nil ext)))
+         (temp-name (file-truename (make-temp-file name nil ext))))
     (flymake-log 3 "create-temp-intemp: file=%s temp=%s" file-name temp-name)
       temp-name))
 
         (list "-s"
               "-C"
               base-dir
-              (concat "CHK_SOURCES=" source)
+              (concat "CHK_SOURCES=" (shell-quote-argument source))
               "SYNTAX_CHECK_MODE=1"
               "check-syntax")))
 
   (list "ant"
         (list "-buildfile"
               (concat base-dir "/" "build.xml")
-              (concat "-DCHK_SOURCES=" source)
+              (concat "-DCHK_SOURCES=" (shell-quote-argument source))
               "check-syntax")))
 
 (defun flymake-simple-make-init-impl (create-temp-f use-relative-base-dir use-relative-source build-file-name get-cmdline-f)
                         (file-name-directory buffer-file-name))))
       (list "rpmlint" (list local-file))))
 
+;; check po files with msgfmt -c
+(defun flymake-pofile-init ()
+    (let* ((temp-file (flymake-init-create-temp-buffer-copy
+                       'flymake-create-temp-copy))
+           (local-file (file-relative-name
+                        temp-file
+                        (file-name-directory buffer-file-name))))
+      (list "msgfmt" (list "-c" local-file))))
+
+
 ;;;; tex-specific init-cleanup routines
 (defun flymake-get-tex-args (file-name)
   ;;(list "latex" (list "-c-style-errors" file-name))
 
 ;;;; xml-specific init-cleanup routines
 (defun flymake-xml-init ()
-  (list "xmlstarlet" (list "val" (flymake-init-create-temp-buffer-copy 'flymake-create-temp-copy))))
+  (list "xmlstarlet" (list "val" "-e" (flymake-init-create-temp-buffer-copy 'flymake-create-temp-copy))))
 
 (provide 'flymake)
 
 
 MAX_DESCRIPTION_LENGTH = 60
 
+SCRIPT_DIR = os.path.normpath(os.path.join(os.path.dirname(__file__)))
+
 class LintRunner(object):
     """ Base class provides common functionality to run
           python code checkers. """
         cmdline = [self.command]
         cmdline.extend(self.run_flags)
         cmdline.append(filename)
+        os.chdir(SCRIPT_DIR)
+        if not os.path.exists(os.path.expanduser(filename)):
+            os.chdir(SCRIPT_DIR)
+        #    print 'error file can not be open %s cwd %s line 1' % (filename, os.getcwd())
+        #    sys.exit(1)
 
         env = dict(os.environ, **self.env)
         logging.debug(' '.join(cmdline))

pylookup-index.sh

 #!/bin/sh
-./pylookup.py -d /var/db/pylookup/pylookup.db -u /usr/share/doc/python-docs-2.*/html -u ~/django-docs/_build/html/
+./pylookup.py -d /var/db/pylookup/pylookup.db \
+  -u /usr/share/doc/python-docs-2.*/html \
+  -u ~/docs/django/_build/html #\
+#  -u ~/docs/pymongo-2.3