diff --git a/.conkerorrc b/.conkerorrc index 9dd96ba..dbdda54 100644 --- a/.conkerorrc +++ b/.conkerorrc @@ -27,12 +27,25 @@ hints_display_url_panel = true; cwd = get_home_directory(); //cwd.append("downloads"); -// automatically handle some mime types internally. -content_handlers.set("application/pdf", content_handler_save); +// set how conkeror will handle certian mime types +content_handlers.set("application/x-bittorrent", content_handler_open_url); // external programs for handling various mime types. +external_content_handlers = { + "*": "emacsclient", + text: { "*": "emacsclient" }, + image: { "*": "feh --scale-down" }, + application: { + pdf: "zathura", + postscript: "zathura", + "x-dvi": "zathura", + "x-bittorrent": "transmission-remote -a" + } +}; + external_content_handlers.set("application/pdf", "zathura"); external_content_handlers.set("video/*", "urxvtc -e mplayer"); +external_content_handlers.set("application/x-bittorrent", "transmission-remote -a"); // use emacsclient as external editor. editor_shell_command = "emacsclient"; diff --git a/.emacs b/.emacs index 5f6c749..0e0ddb7 100644 --- a/.emacs +++ b/.emacs @@ -173,6 +173,10 @@ ;;(autoload 'magit-status magit nil t) ;;(require 'magit) +;; Setup PKGBUILD mode +(autoload 'pkgbuild-mode "pkgbuild-mode.el" "PKGBUILD mode." t) +(setq auto-mode-alist (append '(("/PKGBUILD$" . pkgbuild-mode)) auto-mode-alist)) + ;; setup php-mode (autoload 'php-mode "php-mode.el" "Php mode." t) (setq auto-mode-alist (append '(("/*.\.php[345]?$" . php-mode)) auto-mode-alist)) @@ -289,26 +293,35 @@ ;; setup pastebin.el for use with pastebin.com (require 'pastebin) +;; hs-org/minor-mode, yasnippet, auto-complete-mode and flyspell do not play +;; nicely with one another due to a conflict with the context of their tab binding *TODO* + ;; Make hs-minor-mode act like org-mode for code folding ;;(add-to-list 'load-path "/usr/share/emacs/site-lisp/hideshow-org") -(require 'hideshow-org) -(global-set-key "\C-ch" 'hs-org/minor-mode) +;; (require 'hideshow-org) +;; (global-set-key "\C-ch" 'hs-org/minor-mode) ;; Add automatic activation of hs-org/minor-mode in the below major-modes -(add-hook 'c-mode-common-hook 'hs-org/minor-mode) -(add-hook 'emacs-lisp-mode-hook 'hs-org/minor-mode) -(add-hook 'java-mode-hook 'hs-org/minor-mode) -(add-hook 'lisp-mode-hook 'hs-org/minor-mode) -(add-hook 'sh-mode-hook 'hs-org/minor-mode) -(add-hook 'python-mode-hook 'hs-org/minor-mode) -(add-hook 'scheme-mode-hook 'hs-org/minor-mode) +;; (add-hook 'c-mode-common-hook 'hs-org/minor-mode) +;; (add-hook 'emacs-lisp-mode-hook 'hs-org/minor-mode) +;; (add-hook 'java-mode-hook 'hs-org/minor-mode) +;; (add-hook 'lisp-mode-hook 'hs-org/minor-mode) +;; (add-hook 'sh-mode-hook 'hs-org/minor-mode) +;; (add-hook 'python-mode-hook 'hs-org/minor-mode) +;; (add-hook 'scheme-mode-hook 'hs-org/minor-mode) ;; Setup fancy auto-complete (add-to-list 'load-path "/usr/share/emacs/site-lisp/auto-complete") (require 'auto-complete-config) (add-to-list 'ac-dictionary-directories "/usr/share/emacs/site-lisp/auto-complete/ac-dict") (ac-config-default) - + +;; Setup yasnippet-mode *TODO* - in conflict (see comment where hs-org/minor-mode is required) +;; (add-to-list 'load-path "/usr/share/emacs/site-lisp/yas") +;; (require 'yasnippet) ;; not yasnippet-bundle +;; (yas/initialize) +;; (yas/load-directory "/usr/share/emacs/site-lisp/yas/snippets") + ;; Enable flyspell-mode (ac-flyspell-workaround) ;; Known Bug: flyspell-mode doesn't play nice with auto-complete-mode @@ -450,6 +463,20 @@ (let ((inhibit-read-only t)) (erase-buffer))) +(add-to-list 'load-path "~/.emacs.d/el-get/el-get") + +;; *BROKEN*..can't connect to dbus for some reason? +;; ;; Setup el-get +;; (unless (require 'el-get nil t) +;; (with-current-buffer +;; (url-retrieve-synchronously +;; "https://raw.github.com/dimitri/el-get/master/el-get-install.el") +;; (end-of-buffer) +;; (eval-print-last-sexp))) + +;; ;; Synchronize el-get +;; (el-get 'sync) + ;; Set repos for package.el (setq package-archives '(("ELPA" . "http://tromey.com/elpa/") ("gnu" . "http://elpa.gnu.org/packages/") diff --git a/.gnus b/.gnus index 05f8d0c..67250be 100644 --- a/.gnus +++ b/.gnus @@ -9,42 +9,49 @@ (setq nnmail-expiry-wait 2) (setq nnmail-resplit-incoming t) -(setq user-mail-address "collin.doering@gmail.com") +(setq user-mail-address "rekahsoft@gmail.com") (setq mail-host-address "gmail.com") -(setq gnus-message-archive-group "nnimap+collin.doering:INBOX.Sent") -(setq gnus-outgoing-message-group "nnimap+collin.doering:INBOX.Sent") +(setq gnus-message-archive-group "nnimap+rekahsoft:[Gmail]/Sent") +(setq gnus-outgoing-message-group "nnimap+rekahsoft:[Gmail]/Sent") ;; use smtp to send mail (setq message-send-mail-function 'smtpmail-send-it smtpmail-starttls-credentials '(("smtp.gmail.com" 587 nil nil)) - smtpmail-auth-credentials "~/.cd-authinfo" + smtpmail-auth-credentials "~/.authinfo.gpg" smtpmail-default-smtp-server "smtp.gmail.com" smtpmail-smtp-server "smtp.gmail.com" smtpmail-smtp-service 587 - smtpmail-local-domain "rekahsoft.homelinux.org") + smtpmail-local-domain "rekahsoft.dyndnshomelinux.org") ;; set primary select method.. -(setq gnus-select-method '(nnimap "collin.doering" +(setq gnus-select-method '(nnimap "rekahsoft" (remove-prefix "INBOX.") (nnimap-address "imap.gmail.com") (nnimap-server-port 993) (nnimap-stream ssl) - (nnimap-authinfo-file "~/.cd-authinfo"))) + (nnimap-authinfo-file "~/.authinfo.gpg"))) -;; -(setq gnus-secondary-select-methods - '((nnimap "rekahsoft" - (remove-prefix "INBOX.") - (nnimap-address "imap.gmail.com") - (nnimap-server-port 993) - (nnimap-stream ssl) - (nnimap-authinfo-file "~/.authinfo")))) +;; can't get two imap gmail accounts to work simultaniously +;; (setq gnus-secondary-select-methods +;; '( +;; (nnimap "collin.doering" +;; (remove-prefix "INBOX.") +;; (nnimap-address "imap.gmail.com") +;; (nnimap-server-port 993) +;; (nnimap-stream ssl) +;; (nnimap-authinfo-file "~/.cd-authinfo.gpg")) +;; (nnimap "rekahsoft" +;; (remove-prefix "INBOX.") +;; (nnimap-address "imap.gmail.com") +;; (nnimap-server-port 993) +;; (nnimap-stream ssl) +;; (nnimap-authinfo-file "~/.authinfo.gpg")))) ;; (nnimap "rekahsoft.mail" ;; (remove-prefix "INBOX.") ;; (nnimap-address "imap.gmail.com") ;; (nnimap-server-port 993) ;; (nnimap-stream ssl) -;; (nnimap-authinfo-file "~/.rkm-authinfo")))) +;; (nnimap-authinfo-file "~/.rkm-authinfo.gpg")))) (remove-hook 'gnus-mark-article-hook 'gnus-summary-mark-read-and-unread-as-read) @@ -54,11 +61,12 @@ ;; setting up posting styles (setq gnus-posting-styles '((".*" + (address "rekahsoft@gmail.com") + (name "Collin J. Doering (RekahSoft)")) + ("collin.doering@gmail.com" (address "collin.doering@gmail.com") (name "Collin J. Doering")) - ("rekahsoft@gmail.com" - (address "rekahsoft@gmail.com") - (name "Collin J. Doering (RekahSoft)")))) + )) ;;gnus-group-line-format's default value was ;;"%M%S%p%P%5y:%B%(%g%)%l %O\n" diff --git a/.screenrc b/.screenrc index 66bff93..37b7a49 100644 --- a/.screenrc +++ b/.screenrc @@ -1,16 +1,17 @@ # Open several named screens at startup and run different commands in each screen -t zsh 0 zsh screen -t irssi 1 irssi -screen -t ncmpcpp 2 ncmpcpp +#screen -t ncmpcpp 2 ncmpcpp screen -t alsamixer 3 alsamixer screen -t mc 4 mc -screen -t nvlc 5 nvlc +screen -t cmus 5 cmus +#screen -t nvlc 5 nvlc # Set default prefix from C-a to C-t escape ^Tt -# Switch to window 1 (irssi) -#screen -p irssi +# Switch to window 1 (irssi) *TODO* +#screen -p select irssi # Set hard status line hardstatus alwayslastline '%{gk}[ %{G}%H %{g}][%= %{wk}%?%-Lw%?%{=b kR}[%{W}%n%f %t%?(%u)%?%{=b kR}]%{= kw}%?%+Lw%?%?%=%{g}][%{Y}%l%{g}]%{=b C}[ %D %m/%d %C%a ]%{W}' diff --git a/.xinitrc b/.xinitrc index 199a889..b8305f5 100644 --- a/.xinitrc +++ b/.xinitrc @@ -21,8 +21,8 @@ nitrogen --restore & # Have mouse pointer hide after 5 seconds unclutter & -# Setup system tray -trayer --monitor 1 --edge top --align right --expand true --width 4 --height 2 --transparent true --tint 0x000000 & +# Setup system tray *DISABLED* :: whats the point of a systray if no apps use it? +#trayer --monitor 1 --edge top --align right --expand true --width 4 --height 2 --transparent true --tint 0x000000 & # Use xbindkeys to bind media keys etc.. xbindkeys & diff --git a/.xmonad/xmonad.hs b/.xmonad/xmonad.hs index d3f4b4c..1a59477 100644 --- a/.xmonad/xmonad.hs +++ b/.xmonad/xmonad.hs @@ -32,11 +32,14 @@ import XMonad.Layout.NoBorders(noBorders,smartBorders) import XMonad.Layout.ResizableTile import XMonad.Layout.Grid import XMonad.Layout.ToggleLayouts +import XMonad.Layout.SubLayouts +import XMonad.Layout.WindowNavigation +import XMonad.Layout.BoringWindows import XMonad.Util.NamedScratchpad import XMonad.Actions.GridSelect import XMonad.Actions.FloatKeys import XMonad.Util.Dmenu - +import XMonad.Layout.Tabbed import XMonad.Hooks.ManageDocks import XMonad.Hooks.DynamicLog import XMonad.Hooks.UrgencyHook @@ -247,9 +250,6 @@ myGenericKeys = -- Launch MC scratchpad , ((modm .|. controlMask, xK_3), namedScratchpadAction scratchpads "mc-scratch") - -- Launch transmission scratchpad (formally deluge) - , ((modm .|. controlMask, xK_4), namedScratchpadAction scratchpads "transmission") - -- Select window from dmenu and go to the workspace its on , ((modm .|. shiftMask, xK_g), gotoMenuArgs ["-i","-nb", "#040404","-nf","#00FFFF","-sf","#ffa0ff","-sb","#000000"]) @@ -261,16 +261,30 @@ myGenericKeys = , ((modm, xK_a), withFocused (keysMoveWindow (-10,0))) -- move floating window left , ((modm, xK_s), withFocused (keysMoveWindow (0,-10))) -- move floating window up , ((modm, xK_x), withFocused (keysMoveWindow (0,10))) -- move floating window down --- , ((modm .|. shiftMask, xK_a), withFocused (keysResizeWindow (-10,0) (0,0))) -- resize floating window (left) --- , ((modm .|. shiftMask, xK_d), withFocused (keysResizeWindow (10,0) (0,0))) -- resize floating window (right) --- , ((modm .|. shiftMask, xK_s), withFocused (keysResizeWindow (0,-10) (0,0))) -- resize floating window (up) --- , ((modm .|. shiftMask, xK_x), withFocused (keysResizeWindow (0,-10) (0,1))) -- resize floating window (down) + -- , ((modm .|. shiftMask, xK_a), withFocused (keysResizeWindow (-10,0) (0,0))) -- resize floating window (left) + -- , ((modm .|. shiftMask, xK_d), withFocused (keysResizeWindow (10,0) (0,0))) -- resize floating window (right) + -- , ((modm .|. shiftMask, xK_s), withFocused (keysResizeWindow (0,-10) (0,0))) -- resize floating window (up) + -- , ((modm .|. shiftMask, xK_x), withFocused (keysResizeWindow (0,-10) (0,1))) -- resize floating window (down) + + -- For implementation of sub-layouts (not used currently) + -- See http://xmonad.org/xmonad-docs/xmonad-contrib/XMonad-Layout-SubLayouts.html + -- , ((modm .|. controlMask, xK_h), sendMessage $ pullGroup L) + -- , ((modm .|. controlMask, xK_l), sendMessage $ pullGroup R) + -- , ((modm .|. controlMask, xK_k), sendMessage $ pullGroup U) + -- , ((modm .|. controlMask, xK_j), sendMessage $ pullGroup D) + + -- , ((modm .|. controlMask, xK_m), withFocused (sendMessage . MergeAll)) + -- , ((modm .|. controlMask, xK_u), withFocused (sendMessage . UnMerge)) + + -- , ((modm .|. controlMask, xK_period), onGroup W.focusUp') + -- , ((modm .|. controlMask, xK_comma), onGroup W.focusDown') -- Expand a mirror pane , ((modm .|. shiftMask, xK_l), sendMessage MirrorExpand) -- Shrink a mirror pane - , ((modm .|. shiftMask, xK_h), sendMessage MirrorShrink) ] where modm = mod4Mask + , ((modm .|. shiftMask, xK_h), sendMessage MirrorShrink)] + where modm = mod4Mask ------------------------------------------------------------------------ -- Mouse bindings: default actions bound to mouse events @@ -310,6 +324,9 @@ myMouseBindings (XConfig {XMonad.modMask = modm}) = M.fromList $ -- myLayout = smartBorders . avoidStruts $ toggleLayouts (noBorders Full) $ +-- for sublayouts but not currently used..see myGenericBindings above +-- windowNavigation $ subTabbed $ boringWindows $ +-- to get tabbed layout add simple rztiled ||| Mirror rztiled ||| Grid where -- default tiling algorithm partitions the screen into two panes @@ -344,6 +361,7 @@ myLayout = smartBorders . avoidStruts $ -- myManageHook = composeAll [ className =? "MPlayer" --> doFloat + , resource =? "supertux2" --> doCenterFloat -- , title =? "DOOM 3" --> doIgnore , resource =? "Qt-subapplication" <&&> title /=? "Oracle VM VirtualBox Manager" --> doFloat , resource =? "vncviewer" --> doCenterFloat @@ -357,20 +375,17 @@ myManageHook = composeAll scratchpads = [ NS "emacs-scratch" spawnEmacsScratch findEmacsScratch manageEmacsScratch , NS "maintainance-terminal" spawnMaintainanceTerminal findMaintainanceTerminal manageMaintainanceTerminal , NS "screen-terminal" spawnScreenTerminal findScreenTerminal manageScreenTerminal - , NS "mc-scratch" spawnMcScratch findMcScratch manageMcScratch - , NS "transmission" spawnTransmission findTransmission manageTransmission ] + , NS "mc-scratch" spawnMcScratch findMcScratch manageMcScratch] where findEmacsScratch = resource =? "emacs-scratch" findMaintainanceTerminal = resource =? "scratchpad" findScreenTerminal = resource =? "screen-scratch" findMcScratch = resource =? "mc-scratch" - findTransmission = resource =? "transmission-gtk" spawnEmacsScratch = myTerminal ++ " -name emacs-scratch -pe -tabbedex -e emacsclient -nw" spawnMaintainanceTerminal = myTerminal ++ " -name scratchpad" spawnScreenTerminal = myTerminal ++ " -name screen-scratch -bg black" spawnMcScratch = myTerminal ++ " -name mc-scratch -pe -tabbedex -e mc" - spawnTransmission = "transmission-gtk" manageEmacsScratch = customFloating $ W.RationalRect l t w h where @@ -396,12 +411,6 @@ scratchpads = [ NS "emacs-scratch" spawnEmacsScratch findEmacsScratch manageEmac w = 0.55 -- terminal width (%) t = 1 - h -- distance from top edge (%) l = 1 - w -- distance from left edge (%) - manageTransmission = customFloating $ W.RationalRect l t w h - where - h = 0.98 -- terminal height (%) - w = 1 -- terminal width (%) - t = 1 - h -- distance from top edge (%) - l = 1 - w -- distance from left edge (%) ------------------------------------------------------------------------ -- Event handling diff --git a/.zshrc b/.zshrc index ba3eae0..17177a1 100644 --- a/.zshrc +++ b/.zshrc @@ -1,6 +1,10 @@ # The following lines were added by compinstall -zstyle ':completion:*' completer _complete _ignored _approximate +zstyle ':completion:*' completer _list _expand _complete _ignored _match _correct _approximate _prefix +zstyle ':completion:*' list-colors '' +zstyle ':completion:*' matcher-list '' 'm:{[:lower:][:upper:]}={[:upper:][:lower:]}' 'r:|[._-/,+]=** r:|=**' 'l:|=* r:|=*' +zstyle ':completion:*' max-errors 5 +zstyle ':completion:*' preserve-prefix '//[^/]##/' zstyle :compinstall filename '/home/collin/.zshrc' autoload -Uz compinit