Alexander Dinu avatar Alexander Dinu committed caabcf9

changes

Comments (0)

Files changed (14)

 (load-file "/home/aluuu/.emacs.d/conf.d/appearance.el")
 (load-file "/home/aluuu/.emacs.d/conf.d/auto-complete.el")
 (load-file "/home/aluuu/.emacs.d/conf.d/lisp.el")
-(load-file "/home/aluuu/.emacs.d/conf.d/flymake.el")
 (load-file "/home/aluuu/.emacs.d/conf.d/python.el")
 
 (custom-set-variables
-  ;; custom-set-variables 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.
+ ;; custom-set-variables 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.
  '(indent-tabs-mode nil)
- '(slime-complete-symbol*-fancy t)
- '(slime-lisp-implementations (quote ((sbcl ("/home/aluuu/bin/sbcl") :coding-system utf-8-unix) (cljs ("/home/aluuu/bin/browser-repl") :coding-system utf-8-unix))) t)
- '(slime-net-coding-system (quote utf-8-unix))
  '(tab-width 4))
+
+(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.
+ '(flymake-errline ((((class color)) (:underline "red"))))
+ '(flymake-warnline ((((class color)) (:underline "yellow"))))
+ '(tabbar-default ((t (:inherit variable-pitch :background "#1d1f21" :foreground "#c5c8c6" :slant normal :weight normal :height 90 :width normal :foundry "unknown" :family "Anonymous Pro")))))
+(put 'upcase-region 'disabled nil)

emacs.d/conf.d/appearance.el

 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 (global-linum-mode 1)
 (global-hl-line-mode 1)
-(set-default-font "-unknown-Anonymous Pro-normal-normal-normal-*-14-*-*-*-m-0-iso10646-1")
+(set-default-font "-unknown-Anonymous Pro-normal-normal-normal-1-15-*-*-*-m-0-iso10646-1")
 
 (require 'tabbar)
 (tabbar-mode)
-(set-face-font 'tabbar-default "-unknown-Anonymous Pro-normal-normal-normal-*-14-*-*-*-m-0-iso10646-1")
+(set-face-font 'tabbar-default "-unknown-Anonymous Pro-normal-normal-normal-1-15-*-*-*-m-0-iso10646-1")
 
 (defun aluuu/choose-theme (name)
   (cond ((eq name `solarized-dark)
          (set-face-attribute 'tabbar-button nil :box '(:line-width 1 :color "#073642")))
         ((eq name `gruber)
          (color-theme-gruber-darker))
-        ((eq name `tomorrow) 
+        ((eq name `tomorrow-bright)
+         (color-theme-sanityinc-tomorrow-bright)
+         (set-face-foreground 'tabbar-default "#c5c8c6")
+         (set-face-background 'tabbar-default "#1d1f21")
+         (set-face-foreground 'tabbar-selected "#8abeb7")
+         (set-face-attribute 'tabbar-button nil :box '(:line-width 1 :color "#1d1f21")))
+        ((eq name `tomorrow)
          (color-theme-sanityinc-tomorrow-night)
          (set-face-foreground 'tabbar-default "#c5c8c6")
          (set-face-background 'tabbar-default "#1d1f21")
          (set-face-foreground 'tabbar-selected "#8abeb7")
          (set-face-attribute 'tabbar-button nil :box '(:line-width 1 :color "#1d1f21")))))
 
-(aluuu/choose-theme `tomorrow)
+(aluuu/choose-theme `tomorrow-bright)
 
-;; (setq tabbar-ruler-global-tabbar 't) 
 (setq tabbar-ruler-global-ruler 't)
-;; (setq tabbar-ruler-popup-menu 't) 
-;; (setq tabbar-ruler-popup-toolbar 't)
-
-

emacs.d/conf.d/base.el

 
 (require 'tramp)
 
-;; identation settings
-;; (add-hook
-;;  'write-file-hooks
-;;  (lambda ()
-;;    ;; automatic untabify all files while saving
-;;    (if (not indent-tabs-mode)
-;;        (untabify (point-min) (point-max)))))
-;; (add-hook 'before-save-hook 'delete-trailing-whitespace)
-
 ;; date and time display settings
 (setq display-time-24hr-format t)
 (setq display-time-string-forms
 (require 'org-install)
 (add-to-list 'auto-mode-alist '("\\.org$" . org-mode))
 
-;; mercurial-mode
-(require 'mercurial)
-
 ;; lambda mode
-(require 'lambda-mode)
-(add-hook 'lisp-mode-hook #'lambda-mode 1)
-(add-hook 'python-mode-hook #'lambda-mode 1)
-(add-hook 'emacs-lisp-mode-hook #'lambda-mode 1)
+(require 'pretty-lambdada)
+(add-hook 'lisp-mode-hook #'pretty-lambda-mode 1)
+(add-hook 'python-mode-hook #'pretty-lambda-mode 1)
+(add-hook 'emacs-lisp-mode-hook #'pretty-lambda-mode 1)
+(add-hook 'clojure-mode-hook #'pretty-lambda-mode 1)
 
 ;; highlighting parentheses
 (require 'highlight-parentheses)
 (add-hook 'lisp-mode-hook #'highlight-parentheses-mode 1)
+(add-hook 'clojure-mode-hook #'highlight-parentheses-mode 1)
 (add-hook 'python-mode-hook #'highlight-parentheses-mode 1)
 (add-hook 'emacs-lisp-mode-hook #'highlight-parentheses-mode 1)
+
 (add-to-list 'auto-mode-alist '("\\.emacs$" . lisp-mode))
+(add-to-list 'auto-mode-alist '("\\emacs$" . lisp-mode))
+
+(add-hook 'before-save-hook 'delete-trailing-whitespace)
+
 (server-start)

emacs.d/conf.d/clojure.el

 
-(defun my-clojure-mode-hook ()
-  (hs-minor-mode 1)
-  ;; (paredit-mode 1)
-  (highlight-symbol-mode)
-  (lambda-mode 1)
-  (slime-mode 1)
-  (setq highlight-symbol-face '((:underline t)))
-  (custom-set-faces '(highlight-symbol-face ((((class color) (background dark)) (:background "yellow"))))))
+;; (defun my-clojure-mode-hook ()
+;;   (hs-minor-mode 1)
+;;   ;; (paredit-mode 1)
+;;   (highlight-symbol-mode)
+;;   (lambda-mode 1)
+;;   (slime-mode 1)
+;;   (setq highlight-symbol-face '((:underline t)))
+;;   (custom-set-faces '(highlight-symbol-face ((((class color) (background dark)) (:background "yellow"))))))
 
-(setq auto-mode-alist
-      (append '(("\\.clj$" . clojure-mode)
-                ("\\.cljs$" . clojure-mode))
-              auto-mode-alist))
+;; (setq auto-mode-alist
+;;       (append '(("\\.clj$" . clojure-mode)
+;;                 ("\\.cljs$" . clojure-mode))
+;;               auto-mode-alist))
 
-(add-hook 'clojure-mode-hook #'my-clojure-mode-hook)
+;; (add-hook 'clojure-mode-hook #'my-clojure-mode-hook)

emacs.d/conf.d/flymake.el

-(custom-set-faces
- '(flymake-errline ((((class color)) (:underline "red"))))
- '(flymake-warnline ((((class color)) (:underline "yellow")))))
+;; (custom-set-faces
+;;  '(flymake-errline ((((class color)) (:underline "red"))))
+;;  '(flymake-warnline ((((class color)) (:underline "yellow")))))
 
-(defun flymake-create-temp-intemp (file-name prefix)
-  "source: http://blog.arithm.com/2011/01/27/save-_flymake-files-in-a-temporary-directory/
-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.
+;; (defun flymake-create-temp-intemp (file-name prefix)
+;;   "source: http://blog.arithm.com/2011/01/27/save-_flymake-files-in-a-temporary-directory/
+;; 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.
+;; 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))
+;; 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))
 
-(when (load "flymake" t)
-  (defun flymake-pylint-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))))
-      (list "pyflakes" (list local-file))))
+;; (when (load "flymake" t)
+;;   (defun flymake-pylint-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))))
+;;       (list "pyflakes" (list local-file))))
 
-  (add-to-list 'flymake-allowed-file-name-masks
-               '("\\.py\\'" flymake-pylint-init))
+;;   (add-to-list 'flymake-allowed-file-name-masks
+;;                '("\\.py\\'" flymake-pylint-init))
 
-  (defun flymake-html-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))))
-      (list "tidy" (list local-file))))
+;;   (defun flymake-html-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))))
+;;       (list "tidy" (list local-file))))
 
-  (add-to-list 'flymake-allowed-file-name-masks
-               '("\\.html$\\|\\.ctp" flymake-html-init))
+;;   (add-to-list 'flymake-allowed-file-name-masks
+;;                '("\\.html$\\|\\.ctp" flymake-html-init))
 
-  (add-to-list 'flymake-err-line-patterns
-               '("line \\([0-9]+\\) column \\([0-9]+\\) - \\(Warning\\|Error\\): \\(.*\\)"
-                 nil 1 2 4)))
+;;   (add-to-list 'flymake-err-line-patterns
+;;                '("line \\([0-9]+\\) column \\([0-9]+\\) - \\(Warning\\|Error\\): \\(.*\\)"
+;;                  nil 1 2 4)))
 
-(add-hook 'python-mode-hook #'flymake-mode 1)
+;; (add-hook 'python-mode-hook #'flymake-mode 1)

emacs.d/conf.d/lisp.el

-(require 'slime-autoloads)
-(require 'highlight-symbol)
-(setq highlight-symbol-idle-delay 1)
+;; (require 'slime-autoloads)
+;; (require 'highlight-symbol)
+;; (setq highlight-symbol-idle-delay 1)
 
-(defun aluuu/lisp-mode-hook ()
-  (hs-minor-mode 1)
-  (highlight-symbol-mode)
-  (slime-mode 1)
-  (setq highlight-symbol-face '((:underline t)))
-  (custom-set-faces '(highlight-symbol-face ((((class color) (background dark)) (:background "yellow"))))))
+;; (setq inferior-lisp-program "sbcl")
+;; (require 'slime-autoloads)
+;; ;; (slime-setup '(slime-fancy))
 
-(eval-after-load "slime"
-  `(progn
-     (global-set-key "\C-z" 'slime-selector)
-     (global-set-key "\C-x \C-e" 'slime-eval-last-expression)
-     (global-set-key "\C-c \C-r" 'slime-eval-region)
-     (global-set-key "\C-c \C-c" 'slime-compile-file)
-     (slime-setup '(slime-fancy slime-indentation slime-tramp slime-asdf slime-sprof))
-     (custom-set-variables
-      '(slime-complete-symbol*-fancy t)
-      '(slime-net-coding-system 'utf-8-unix)
-      '(slime-lisp-implementations '((sbcl ("/home/aluuu/bin/sbcl") :coding-system utf-8-unix)
-                                     (cljs ("/home/aluuu/bin/browser-repl") :coding-system utf-8-unix))))))
+;; (defun aluuu/lisp-mode-hook ()
+;;   (hs-minor-mode 1)
+;;   (highlight-symbol-mode)
+;;   (slime-mode 1)
+;;   (setq highlight-symbol-face '((:underline t)))
+;;   (custom-set-faces '(highlight-symbol-face ((((class color) (background dark)) (:background "yellow"))))))
+(setq inferior-lisp-program "/usr/bin/sbcl")
+(load (expand-file-name "~/quicklisp/slime-helper.el"))
+;; Replace "sbcl" with the path to your implementation
 
-(add-hook 'lisp-mode-hook #'aluuu/lisp-mode-hook 1)
+
+;; (eval-after-load "slime"
+;;   `(progn
+;;      (global-set-key "\C-z" 'slime-selector)
+;;      (global-set-key "\C-x \C-e" 'slime-eval-last-expression)
+;;      (global-set-key "\C-c \C-r" 'slime-eval-region)
+;;      (global-set-key "\C-c \C-c" 'slime-compile-file)
+;;      (slime-setup '(slime-indentation slime-tramp slime-asdf slime-sprof))
+;;      (custom-set-variables
+;;       '(slime-complete-symbol*-fancy t)
+;;       '(slime-net-coding-system 'utf-8-unix)
+;;       '(slime-lisp-implementations '((sbcl ("/usr/bin/sbcl") :coding-system utf-8-unix))))))
+
+;; (add-hook 'lisp-mode-hook #'aluuu/lisp-mode-hook 1)
 [user]
 	name = aluuu
-	email = zloy.alu@gmail.com
+	email = zloy.alu@gmail.com
+[push]
+	default = simple
+[core]
+	autocrlf = false
+[credential]
+	helper = cache --timeout 3600
+[alias]
+        ci = commit
+        st = status
+        glog = log --graph
 [ui]
 username = Alexander Dinu <zloy.alu@gmail.com>
 verbose = True
+editor = emacsclient
 
 [extensions]
 graphlog =
 color =
 progress =
 mq =
+hgext.churn=
+prompt = ~/.hgplugins/hg-prompt/prompt.py
+record =
+
+[alias]
+blame = annotate --user --number
-(load "/etc/gentoo-init.lisp")
+;; (load "/etc/gentoo-init.lisp")
 
 ;;; The following lines added by ql:add-to-init-file:
 #-quicklisp

screenlayout/work.sh

 #!/bin/sh
-xrandr --output LVDS1 --mode 1024x600 --pos 0x1080 --rotate normal --output VGA1 --mode 1920x1080 --pos 0x0 --rotate normal
+xrandr --output VGA-0 --off --output LVDS --mode 1366x768 --pos 1920x312 --rotate normal --output HDMI-0 --mode 1920x1080 --pos 0x0 --rotate normal
 #### COLOUR (Solarized 256)
 
 # default statusbar colors
-set-option -g status-bg colour235 #base02
-set-option -g status-fg colour136 #yellow
+set-option -g status-bg colour240
+set-option -g status-fg colour166
 set-option -g status-attr default
 
 # default window title colors
-set-window-option -g window-status-fg colour244 #base0
-set-window-option -g window-status-bg default
+set-window-option -g window-status-fg colour196
+set-window-option -g window-status-bg colour240
 set-window-option -g window-status-attr dim
 
+
 # active window title colors
-set-window-option -g window-status-current-fg colour166 #orange
-set-window-option -g window-status-current-bg default
+set-window-option -g window-status-current-fg colour240
+set-window-option -g window-status-current-bg colour64
 set-window-option -g window-status-current-attr bright
 
 # pane border
-set-option -g pane-border-fg colour235 #base02
-set-option -g pane-active-border-fg colour240 #base01
+set-option -g pane-border-fg colour240
+set-option -g pane-active-border-fg colour64
 
 # message text
-set-option -g message-bg colour235 #base02
-set-option -g message-fg colour166 #orange
+set-option -g message-bg colour240
+set-option -g message-fg colour166
 
 # pane number display
-set-option -g display-panes-active-colour colour33 #blue
-set-option -g display-panes-colour colour166 #orange
+set-option -g display-panes-active-colour colour64
+set-option -g display-panes-colour colour64
 
 # clock
-set-window-option -g clock-mode-colour colour64 #green
+set-window-option -g clock-mode-colour colour64
 
 # status bar
 set-option -g status-utf8 on
 
 # Activity monitoring
 setw -g monitor-activity on
-set -g visual-activity on
+set -g visual-activity off
 
 # Allows for faster key repetition
-set -s escape-time 0
+set -s escape-time 1
 
-# Rather than constraining window size to the maximum size of any client 
-# connected to the *session*, constrain window size to the maximum size of any 
+# Rather than constraining window size to the maximum size of any client
+# connected to the *session*, constrain window size to the maximum size of any
 # client connected to *that window*. Much more reasonable.
-setw -g aggressive-resize on
+setw -g aggressive-resize off
+setw -g automatic-rename
 
 set -g status-interval 1
-set -g status-justify left # center align window list
+set -g status-justify centre # center align window list
+
+set -g status-left-length 140
+set -g status-left '#(cat /proc/loadavg)'
+
 set -g status-right-length 140
-set -g status-right '#[fg=colour244,dim]#(sysctl vm.loadavg) %a%l:%M:%S %p %Y-%m-%d'
+set -g status-right '%H:%M:%S %Y-%m-%d'
 set -g terminal-overrides 'xterm*:smcup@:rmcup@'
 
 unbind C-b
-set -g prefix M-x
+set -g prefix M-b
   font = "xft:Andale Mono-8:normal:antialias=true",
   border = NoBorder,
   borderColor = "#000000",
-  bgColor = "#1d1f21",
-  fgColor = "#f0c674",
-  position = TopSize L 94 20,
+  bgColor = "#fdf6e3",
+  fgColor = "#002b36",
+  position = BottomSize L 100 20,
   lowerOnStart = True,
   commands = [
     Run StdinReader,
-    Run Cpu ["-L","3","-H","50","--normal","#f0c674","--high","#cc6666"] 10,
+    Run Cpu ["-L","3","-H","50","--normal","#859900","--high","#d33682"] 10,
     Run Memory ["-t","Mem: <usedratio>%"] 10
     ],
   sepChar = "%",
   alignSep = "}{",
-  template = "%StdinReader% | <fc=#f0c674>%cpu%</fc> | <fc=#f0c674>%memory%</fc>"
+  template = "%StdinReader% | <fc=#002b36>%cpu%</fc> | <fc=#002b36>%memory%</fc>"
   }
 import XMonad.Layout.PerWorkspace
 import XMonad.Util.WindowProperties
 import XMonad.Util.Loggers
-
+import XMonad.Layout.OneBig
+import XMonad.Layout.Circle
+import XMonad.Layout.DragPane
+import XMonad.Layout.Dishes
 
 myShorten :: Int -> String -> String
 myShorten n xs | length xs < n = xs
 
 -- Width of the window border in pixels.
 --
-myBorderWidth   = 1
+myBorderWidth   = 2
 
 -- modMask lets you specify which modkey you want to use. The default
 -- is mod1Mask ("left alt").  You may also consider using mod3Mask
 --
 -- > workspaces = ["web", "irc", "code" ] ++ map show [4..9]
 --
-myWorkspaces    = ["web", "code", "term", "im", "5", "6", "7", "8", "9"]
+myWorkspaces    = ["web", "code", "term", "im", "remote_1", "remote_2", "remote_3", "misc", "audio"]
 
 -- Border colors for unfocused and focused windows, respectively.
 --
-myNormalBorderColor  = "#dddddd"
-myFocusedBorderColor = "#268bd2"
+myNormalBorderColor  = "#6c71c4"
+myFocusedBorderColor = "#859900"
 
 ------------------------------------------------------------------------
 -- Key bindings. Add, modify or remove key bindings here.
     -- mod-[1..9], Switch to workspace N
     -- mod-shift-[1..9], Move client to workspace N
     --
+    -- [((m .|. modm, k), windows $ onCurrentScreen f i)
+    --      | (i, k) <- zip (workspaces' conf) [xK_1 .. xK_9]
+    --      , (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]]
     [((m .|. modm, k), windows $ f i)
         | (i, k) <- zip (XMonad.workspaces conf) [xK_1 .. xK_9]
         , (f, m) <- [(W.greedyView, 0), (W.shift, shiftMask)]]
-     ++
+
+    -- ++
+
+    -- -- mod-shift-{w,e,r} %! Move client to screen 1, 2, or 3
+    -- [((m .|. modm, k), screenWorkspace sc >>= flip whenJust (windows . f))
+    --     | (k, sc) <- zip [xK_w, xK_e, xK_r] [0..]
+    --     , (f, m) <- [(W.view, 0), (W.shift, shiftMask)]]
+
+    ++
 
     [ ((modm,               xK_Right),  nextWS)
     , ((modm,               xK_Left),    prevWS)
 myMouseBindings (XConfig {XMonad.modMask = modm}) = M.fromList $
 
     -- mod-button1, Set the window to floating mode and move by dragging
-    [ ((modm, button1), (\w -> focus w >> mouseMoveWindow w
-                                       >> windows W.shiftMaster))
+    [
+    -- ((modm, button1), (\w -> focus w >> mouseMoveWindow w
+    --                                        >> windows W.shiftMaster))
 
     -- mod-button2, Raise the window to the top of the stack
-    , ((modm, button2), (\w -> focus w >> windows W.shiftMaster))
+    -- , ((modm, button2), (\w -> focus w >> windows W.shiftMaster))
 
-    -- mod-button3, Set the window to floating mode and resize by dragging
-    , ((modm, button3), (\w -> focus w >> mouseResizeWindow w
-                                       >> windows W.shiftMaster))
+    -- -- mod-button3, Set the window to floating mode and resize by dragging
+    -- , ((modm, button3), (\w -> focus w >> mouseResizeWindow w
+    --                                    >> windows W.shiftMaster))
 
     -- you may also bind events to the mouse scroll wheel (button4 and button5)
     ]
              reflectHoriz $
              withIM (0.15) (Role "gimp-dock") Full
 
-myLayout = onWorkspace "web" Full $  -- layout l1 will be used on workspace "foo".
-           onWorkspace "im" imLayout $  -- layout l2 will be used on workspaces "bar" and "6".
+myLayout = onWorkspace "web" Full $
+           onWorkspace "im" imLayout $
            onWorkspace "8" gimpLayout $
-           tiled ||| Mirror tiled ||| Full
+           tiled ||| Mirror tiled ||| Full ||| OneBig (1/2) (1/2) ||| Circle ||| dragPane Horizontal 0.1 0.5 ||| Dishes 2 (1/6)
                where
-                 -- default tiling algorithm partitions the screen into two panes
                  tiled   = Tall nmaster delta ratio
                  nmaster = 1
                  ratio   = 1/2
 --
 myManageHook = composeAll
                [resource  =? "desktop_window" --> doIgnore,
+                className  =? "Plasma" --> doIgnore,
+                className  =? "plasma-desktop" --> doIgnore,
                 className =? "xfce4-notifyd" --> doIgnore,
                 className =? "Pidgin" --> doF (W.shift "im"),
                 className =? "Firefox" --> doF (W.shift "web"),
-                className =? "Google-chrome" --> doF (W.shift "web"),
+                className =? "Chromium-browser" --> doF (W.shift "web"),
                 className =? "Sonata" --> doF (W.shift "audio"),
-                className =? "Emacs" --> doF (W.shift "code")]
+                className =? "Emacs" --> doF (W.shift "code"),
+                className =? "Subl" --> doF (W.shift "code")]
 
 ------------------------------------------------------------------------
 -- Event handling
 --
 -- By default, do nothing.
 myStartupHook = do
-  spawn "/home/aluuu/.screenlayout/work.sh"
-  spawn "pkill trayer || trayer --edge top --align right --height 20 --padding 1 --widthtype percent --width 7 --transparent true --alpha 0 --tint 0x1d1f21"
+  spawn "/home/aluuu/.screenlayout/home.sh"
+  spawn "pkill trayer-srg || trayer-srg --monitor 1 --edge bottom --align right --height 20 --padding 1 --widthtype percent --width 7 --transparent true --alpha 0 --tint 0xfdf6e3"
   spawn "setxkbmap -model evdev -layout us,ru -option lv3:ralt_switch,grp:caps_toggle,misc:typo,grp_led:caps"
-  spawn "xsetroot -cursor_name left_ptr"
+  spawn "pkill xxkb || xxkb"
+  spawn "xsetroot -cursor_name left_ptr -solid \"#81a2be\""
   spawn "pkill nm-applet || nm-applet"
-  spawn "pkill xxkb || xxkb"
+  spawn "pkill blueman-applet || blueman-applet"
+  spawn "xset b off"
+  spawn "pkill redshift || pkill gtk-redshift || gtk-redshift -l 43.39:79.23 -t 4600:5600 -g 0.8 -m vidmode -v"
 
 -- Command to launch the bar.
-myBar = "xmobar"
+myBar = "xmobar --screen 1"
 
 -- Custom PP, configure it as you like. It determines what is being written to the bar.
-myPP = xmobarPP { ppCurrent = xmobarColor "#f0c674" "" . wrap "(" ")",
-                  ppUrgent = xmobarColor "#cc6666" "" . wrap "*" "*",
-                  ppHidden = xmobarColor "#b294bb" "" . wrap "" "",
+myPP = xmobarPP { ppCurrent = xmobarColor "#d33682" "" . wrap "<" ">",
+                  ppUrgent = xmobarColor "#d33682" "" . wrap "*" "*",
+                  ppHidden = xmobarColor "#002b36" "" . wrap "(" ")",
                   ppHiddenNoWindows = xmobarColor "#373b41" "" . wrap "" "",
                   ppSep = " | ",
-                  ppWsSep = " ",
-                  ppLayout = xmobarColor "#f0c674" "" . myShorten 6,
+                  ppWsSep = "-",
+                  ppLayout = xmobarColor "#002b36" "" . myShorten 6,
                   ppOrder = id,
-                  ppTitle = xmobarColor "#f0c674"  "" . myShorten 0,
+                  ppTitle = xmobarColor "#002b36"  "" . myShorten 0,
                   ppExtras = [
-                   xmobarColorL "#f0c674" "" dateLogger,
-                   xmobarColorL "#f0c674" "" battery
+                   xmobarColorL "#002b36" "" dateLogger,
+                   xmobarColorL "#002b36" "" battery
                    -- ,
                    -- xmobarColorL "#f0c674" "" mpcLogger
                   ]}
         focusFollowsMouse  = myFocusFollowsMouse,
         borderWidth        = myBorderWidth,
         modMask            = myModMask,
-        numlockMask        = myNumlockMask,
+        -- numlockMask        = myNumlockMask,
         workspaces         = myWorkspaces,
         normalBorderColor  = myNormalBorderColor,
         focusedBorderColor = myFocusedBorderColor,
-PATH="/home/aluuu/bin:/usr/lib/cache/bin:${PATH}"
+PATH="/opt/sencha/command:/opt/sencha:/opt/sencha/appbuilder:/opt/sencha/jsbuilder:/home/aluuu/bin:/usr/lib/cache/bin:${PATH}"
 export PATH=${PATH}
 export MPD_HOST=localhost
 export MPD_PORT=6600
 export HISTFILE=~/.zsh_history
 export HISTSIZE=50000
 export SAVEHIST=50000
+export EDITOR=nano
 export TERM=screen-256color
 eval `dircolors ~/.dircolors.256dark`
 autoload -Uz compinit && compinit
 autoload -U promptinit && promptinit
 autoload -U colors && colors
-prompt_aluuu_prompt=${1:-'red'}
-prompt_aluuu_user=${2:-'red'}
+
+prompt_aluuu_prompt=${1:-'yellow'}
+prompt_aluuu_user=${2:-'yellow'}
 prompt_aluuu_root=${3:-'red'}
 base_prompt="<%B%F{$prompt_aluuu_user}%n%b> in "
 post_prompt="%b%f%k"
 path_prompt="[%B%F{$prompt_aluuu_prompt}%1~%b]"
 if [ "$USER" = 'root' ]
   then
-    PS1="$base_prompt$path_prompt %F{red}!# $post_prompt"
+    PS1="$base_prompt$path_prompt %F{red}!!!!# $post_prompt"
   else
     PS1="$base_prompt$path_prompt $ $post_prompt"
   fi
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for ProjectModifiedEvent.java.
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.