@@ -46,18 +46,18 @@ fi | |||
################################# | |||
__search_string(){ | |||
# __search_string str1 str2 | |||
__match(){ | |||
# __match str1 str2 | |||
# return 0 if str2 is found in str1 | |||
expr "$1" : ".*$2.*" >/dev/null | |||
} | |||
if ! __search_string "$PATH" "$HOME/.local/bin" | |||
if ! __match "$PATH" "$HOME/.local/bin" | |||
then | |||
PATH="${PATH}:${HOME}/.local/bin:$HOME/.local/lib/gems/bin" | |||
fi | |||
if ismsys && ! __search_string "$PATH" /c/mingw/bin | |||
if ismsys && ! __match "$PATH" /c/mingw/bin | |||
then | |||
PATH="$PATH:/c/mingw/bin:/c/mingw/msys/1.0/bin" | |||
fi | |||
@@ -67,7 +67,7 @@ fi | |||
# # http://superuser.com/questions/324613/installing-a-library-locally-in-home-directory-but-program-doesnt-recognize-it | |||
# without this ENV i cannot run tmux. another way is to use --disable-shared | |||
# when building tmux | |||
if ! __search_string "$LD_LIBRARY_PATH" "$HOME/.local/lib" | |||
if ! __match "$LD_LIBRARY_PATH" "$HOME/.local/lib" | |||
then | |||
export LD_LIBRARY_PATH="$LD_LIBRARY_PATH:$HOME/.local/lib" | |||
fi | |||
@@ -126,7 +126,7 @@ then | |||
export TMP=/tmp | |||
fi | |||
fi | |||
export TMP="${TMP}/${USER}-tmp" | |||
__match "$TMP" "${USER}-tmp" >/dev/null || export TMP="${TMP}/${USER}-tmp" | |||
export TEMP="$TMP" | |||
mkdir -p "$TMP" | |||
@@ -684,12 +684,11 @@ found, otherwise returns nil." | |||
;; some modes and hooks | |||
(and (fetch-library | |||
"https://raw.github.com/10sr/emacs-lisp/master/remember-major-modes-mode.el") | |||
"https://raw.github.com/10sr/emacs-lisp/master/remember-major-modes-mode.el" | |||
t) | |||
(require 'remember-major-modes-mode nil t) | |||
(remember-major-modes-mode 1) | |||
(add-hook 'after-change-major-mode-hook | |||
'remember-major-modes-remember)) | |||
) | |||
;; Detect file type from shebang and set major-mode. | |||
(add-to-list 'interpreter-mode-alist | |||
@@ -1362,10 +1361,10 @@ If called intearctively, find word at point." | |||
(my-x-open (dired-get-filename t t))) | |||
(if (eq window-system 'mac) | |||
(setq dired-listing-switches "-lhFG") | |||
(setq dired-listing-switches "-lhFG --time-style=long-iso") | |||
(setq dired-listing-switches "-lhF") | |||
(setq dired-listing-switches "-lhF --time-style=long-iso") | |||
) | |||
(setq dired-listing-switches "-lhFG") | |||
(setq dired-listing-switches "-lhF") | |||
(put 'dired-find-alternate-file 'disabled nil) | |||
;; when using dired-find-alternate-file | |||
@@ -1431,7 +1430,7 @@ If called intearctively, find word at point." | |||
"https://raw.github.com/10sr/emacs-lisp/master/dired-list-all-mode.el" | |||
t) | |||
(lazy-load-eval 'dired-list-all-mode) | |||
(setq dired-listing-switches "-lhFG") | |||
(setq dired-listing-switches "-lhF") | |||
(add-hook 'dired-mode-hook | |||
(lambda () | |||
(define-key dired-mode-map "a" 'dired-list-all-mode) | |||
@@ -5,31 +5,32 @@ | |||
<fontconfig> | |||
<alias binding='strong'> | |||
<family>serif</family> | |||
<prefer> | |||
<family>DejaVu Serif</family> | |||
</prefer> | |||
</alias> | |||
<alias> | |||
<family>serif</family> | |||
<prefer> | |||
<family>monapo</family> | |||
</prefer> | |||
</alias> | |||
<alias binding='strong'> | |||
<family>sans-serif</family> | |||
<prefer> | |||
<family>DejaVu Sans</family> | |||
<family>monapo</family> | |||
</prefer> | |||
</alias> | |||
<alias binding='strong'> | |||
<family>monospace</family> | |||
<prefer> | |||
<family>DejaVu Sans Mono</family> | |||
<family>monapo</family> | |||
</prefer> | |||
</alias> | |||
<alias binding='strong'> | |||
<family>serif</family> | |||
<prefer> | |||
<family>DejaVu Serif</family> | |||
</prefer> | |||
</alias> | |||
<alias> | |||
<family>serif</family> | |||
<prefer> | |||
<family>monapo</family> | |||
</prefer> | |||
</alias> | |||
<alias binding='strong'> | |||
<family>sans-serif</family> | |||
<prefer> | |||
<family>DejaVu Sans</family> | |||
<family>monapo</family> | |||
</prefer> | |||
</alias> | |||
<alias binding='strong'> | |||
<family>monospace</family> | |||
<prefer> | |||
<family>Source Code Pro</family> | |||
<family>DejaVu Sans Mono</family> | |||
<family>monapo</family> | |||
</prefer> | |||
</alias> | |||
</fontconfig> |