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