Permalink
Browse files

various updates.. bulkified

  • Loading branch information...
1 parent 4c14407 commit a85b96d56f07cd9117cfb2b8168183162f175cc0 @milomouse committed Jul 3, 2011
Showing with 20 additions and 11 deletions.
  1. +4 −4 .stumpwmrc
  2. +1 −1 stumpwm/key-maps.lisp
  3. +4 −4 stumpwm/storage/desktop.lisp
  4. +10 −1 stumpwm/storage/tile-rules.lisp
  5. +1 −1 zsh/functions
View
@@ -2,13 +2,13 @@
;; ${XDG_CONFIG_DIR:-/howl/conf}/.stumpwmrc ;;
;;--------------------------------------------------------------------------;;
;; author: milomouse <vincent[at]fea.st> ;;
-;; update: 2011-06-21 23:01:09 ;;
+;; update: 2011-07-02 21:41:01 ;;
;;--------------------------------------------------------------------------;;
;; versions used atoc: ;;
;; | sbcl -> 1.0.49-1 ;;
-;; | clx -> 0.7.4-1 ;;
-;; | cl-ppcre -> 2.0.3-1 ;;
-;; | stumpwm-git -> 20110617-1 ;;
+;; | clx -> 0.7.4-2 ;;
+;; | cl-ppcre -> 2.0.3-2 ;;
+;; | stumpwm-git -> 20110702-1 ;;
;;-TODO/CHANGELOG:----------------------------------------------------------;;
;; >>>-: create a 'dedicate' and 'catchall' window-rule (remember * *) ;;
;; >>--: create a 'dedicate' and 'catchall' hook for changing focus color ;;
View
@@ -179,6 +179,7 @@
(dk m (kbd "C-9") "select-window-by-number 9")
(dk m (kbd "C-0") "select-window-by-number 0")
;; <special-char bindings>
+ (dk m (kbd "s-quoteleft") "scratchpad")
(dk m (kbd "s-!") "gmove 1")
(dk m (kbd "s-@") "gmove 2")
(dk m (kbd "s-#") "gmove 3")
@@ -280,7 +281,6 @@
(dk m (kbd "s-F10") "restore-from-datadir desktop")
(dk m (kbd "s-F11") "restore-from-datadir screen")
(dk m (kbd "s-F12") "restore-from-datadir group")
- (dk m (kbd "s-quoteleft") "scratchpad")
M)))
;; EOF
@@ -25,15 +25,15 @@
:X 790
:Y 0
:WIDTH 810
- :HEIGHT 270
+ :HEIGHT 280
:WINDOWS NIL
:CURRENT NIL)
#S(FDUMP
:NUMBER 2
:X 790
- :Y 270
+ :Y 280
:WIDTH 810
- :HEIGHT 630
+ :HEIGHT 620
:WINDOWS NIL
:CURRENT NIL))))
:CURRENT 0)
@@ -97,5 +97,5 @@
:WINDOWS NIL
:CURRENT NIL))
:CURRENT 0))
- :CURRENT 1))
+ :CURRENT 2))
:CURRENT 0)
@@ -1,4 +1,13 @@
-(("6" 0 T T :CLASS "Pysol" :INSTANCE "pySol #2" :TITLE NIL :ROLE NIL)
+(("6" 0 T T :CLASS "Sudoku-savant" :INSTANCE "sudoku-savant" :TITLE NIL :ROLE
+ NIL)
+ ("6" 0 T T :CLASS "Eboard" :INSTANCE "eboard" :TITLE NIL :ROLE NIL)
+ ("3" 0 T T :CLASS "Minefield" :INSTANCE "Navigator" :TITLE NIL :ROLE
+ "browser")
+ ("3" 0 T NIL :CLASS "Minefield" :INSTANCE "Navigator" :TITLE NIL :ROLE
+ "browser")
+ ("3" 0 T NIL :CLASS "Minefield" :INSTANCE "Navigator" :TITLE NIL :ROLE
+ "browser")
+ ("6" 0 T T :CLASS "Pysol" :INSTANCE "pySol #2" :TITLE NIL :ROLE NIL)
("6" 0 T T :CLASS "xskat" :INSTANCE "xskat" :TITLE NIL :ROLE NIL)
("3" 0 T T :CLASS "luakit" :INSTANCE "luakit" :TITLE NIL :ROLE NIL)
("6" 0 T T :CLASS "Ossxmix")
View
@@ -175,7 +175,7 @@ function lss { ls -- ${1:-.}/*(D.om) }
function rc { [[ -n $1 ]] && sudo /etc/rc.d/$1 ${@:/$1} }
function alv { <${${$(command find ${H:-/howl}/othe/archive/installed_*)}[${1:--1}]}|w3m -o pagerline=1000 -o confirm_qq=0 }
function mkcd { command mkdir -p "$@" && cd "$@" }
-function pubip { curl -m 30 http://www.whatismyip.com/automation/n09230945.asp }
+function pubip { curl -m 30 http://automation.whatismyip.com/n09230945.asp }
function newmail { print - ${(Fw)#$(find /howl/mail/*/*/new -type f)} }
function qdep { pacman-color -Q $@ $(pacman-color -Qi $@|grep Depends|cut -d: -f2-|sed -E 's|>\S+\>||g') }
function timec { print "$(date +'%T %Y-%m-%d')" ; while sleep 1 ; do printf '\r%s ' "$(date +'%T %Y-%m-%d')" ; done }

0 comments on commit a85b96d

Please sign in to comment.