From 1856e115d7baeecec971684d26c9cef7a8ee79af Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Wed, 21 Dec 2011 01:29:12 +0900 Subject: [PATCH 01/24] remove CR when in windows and less file --- .bashrc | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/.bashrc b/.bashrc index 58b7da0..f9ead92 100755 --- a/.bashrc +++ b/.bashrc @@ -42,7 +42,12 @@ test -r /etc/bashrc && . /etc/bashrc export PS1="\$(prompt_function)\$ " # PROMPT_COMMAND=prompt_function -export PAGER="less" +if iswindows +then + export PAGER="tr -d \\r | less" +else + export PAGER="less" +fi export EDITOR="vi" export VISUAL="$EDITOR" export LESS="-iRMX" From b11440f7ba2e9bcd2585a6d164b929fdddbda65e Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Sat, 24 Dec 2011 20:00:48 +0900 Subject: [PATCH 02/24] small changes --- .keysnail.js | 22 +++++++++++++--------- 1 file changed, 13 insertions(+), 9 deletions(-) diff --git a/.keysnail.js b/.keysnail.js index e04a987..1d0ae32 100644 --- a/.keysnail.js +++ b/.keysnail.js @@ -512,7 +512,11 @@ ext.add("hide-sidebar", function(){ } }, "hide-sidebar"); - +ext.add("close-and-next-tab", function (ev, arg) { + var n = gBrowser.mCurrentTab._tPos; + BrowserCloseTabOrWindow(); + gBrowser.selectedTab = gBrowser.mTabs[n]; +}, "close and focus to next tab") //}}%PRESERVE% // ========================================================================= // @@ -596,7 +600,7 @@ key.setGlobalKey('M-:', function (ev) { command.interpreter(); }, 'JavaScript のコードを評価'); -key.setViewKey('0', function (ev, arg) { +key.setViewKey('', function (ev, arg) { var n = gBrowser.mCurrentTab._tPos; BrowserCloseTabOrWindow(); gBrowser.selectedTab = gBrowser.mTabs[n]; @@ -752,10 +756,6 @@ key.setViewKey('', function (ev) { goDoCommand("cmd_scrollPageDown"); }, '一画面スクロールダウン'); -key.setViewKey('C-w', function (ev) { - command.copyRegion(ev); -}, '選択中のテキストをコピー'); - key.setViewKey([[''], ['']], function (ev, arg) { return; }, 'ignore'); @@ -769,10 +769,14 @@ key.setViewKey('H', function (ev, arg) { ext.exec("open-hatebu-comment", arg, ev); }, 'hatebu', true); +key.setViewKey('l', function (ev) { + command.focusToById("urlbar"); +}, 'ロケーションバーへフォーカス', true); + key.setEditKey('C-', function (ev) { command.walkInputElement(command.elementsRetrieverTextarea, true, true); }, '次のテキストエリアへフォーカス'); -key.setViewKey('l', function (ev) { - command.focusToById("urlbar"); -}, 'ロケーションバーへフォーカス', true); +key.setViewKey('0', function (ev) { + BrowserCloseTabOrWindow(); +}, 'タブ / ウィンドウを閉じる'); From 67b7105712b487da2672076e1d6b18ec3fa1a4c8 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Sun, 25 Dec 2011 15:35:42 +0900 Subject: [PATCH 03/24] use feh if possible --- .profile | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) mode change 100644 => 100755 .profile diff --git a/.profile b/.profile old mode 100644 new mode 100755 index 4de5de6..34f2786 --- a/.profile +++ b/.profile @@ -1,4 +1,4 @@ -#!/bin/bash +#!/bin/sh if [ -n "${DESKTOP_SESSION}" ]; then xmodmap -e 'keycode 135 = Alt_R Meta_R' # menu key as alt xmodmap -e 'keycode 101 = Alt_R Meta_R' # hiragana key as alt @@ -10,6 +10,10 @@ if [ -n "${DESKTOP_SESSION}" ]; then synclient MaxTapTime=0 synclient MaxSpeed=0.4 synclient MinSpeed=0.2 + + test -f "$HOME/.fehbg" && + type feh >/dev/null 2>&1 && + sh "$HOME/.fehbg" fi export LC_TIME=C From 0bf5b69147b9fe07ea590fcebfab8ac369545692 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Wed, 28 Dec 2011 09:53:56 +0900 Subject: [PATCH 04/24] changes for darwin --- .bashrc | 3 ++- .emacs.el | 8 ++++++-- 2 files changed, 8 insertions(+), 3 deletions(-) diff --git a/.bashrc b/.bashrc index adeb3c3..06ac5f8 100755 --- a/.bashrc +++ b/.bashrc @@ -399,9 +399,10 @@ echo "Japanese letters are 表示可能" safe-cmd diskinfo -type xrandr >/dev/null 2>&1 && { +isdarwin || type xrandr >/dev/null 2>&1 && { xrandr | grep --color=never ^Screen } + iswindows || safe-cmd finger $USER LANG=C safe-cmd id diff --git a/.emacs.el b/.emacs.el index 0a7cdd7..75896cd 100644 --- a/.emacs.el +++ b/.emacs.el @@ -579,8 +579,9 @@ return nil if LIB unfound and downloading failed, otherwise the path of LIB." ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; share clipboard with x -(when (or window-system +(when (and window-system ;; (getenv "DESKTOP_SESSION") + (not (eq window-system 'mac)) ) (setq x-select-enable-clipboard t ; these settings seems to be useless when using emacs in terminal x-select-enable-primary nil) @@ -1312,7 +1313,10 @@ otherwise, use `pack-default-extension' for pack." (not (get-buffer-window bf))) (kill-buffer bf)))) -(setq dired-listing-switches "-lhFG --time-style=long-iso") +(if (eq window-system 'mac) + (setq dired-listing-switches "-lhFG") + (setq dired-listing-switches "-lhFG --time-style=long-iso") + ) (define-minor-mode my-dired-display-all-mode "" :init-value nil From 184848553861fe15195c735fa9e9ef75c365f5de Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Wed, 28 Dec 2011 10:05:17 +0900 Subject: [PATCH 05/24] fix bug: do not run xrandr when isdarwin --- .bashrc | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/.bashrc b/.bashrc index fb29879..f15dd0d 100755 --- a/.bashrc +++ b/.bashrc @@ -400,10 +400,10 @@ echo "Japanese letters are 表示可能" safe-cmd diskinfo -isdarwin || test -n "${DESKTOP_SESSION}" && type xrandr >/dev/null 2>&1 && { +! isdarwin && test -n "${DESKTOP_SESSION}" && type xrandr >/dev/null 2>&1 && { xrandr | grep --color=never ^Screen } -iswindows || safe-cmd finger $USER +! iswindows && safe-cmd finger $USER LANG=C safe-cmd id From 9f2ce43e1ad262a3cdbe7be9222a1e5d868c170c Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Wed, 28 Dec 2011 10:07:16 +0900 Subject: [PATCH 06/24] use plist as value of variable --- .emacs.el | 50 +++++++++++++++++++++++++++++--------------------- 1 file changed, 29 insertions(+), 21 deletions(-) diff --git a/.emacs.el b/.emacs.el index 24fbcaf..d8bc1c3 100644 --- a/.emacs.el +++ b/.emacs.el @@ -717,7 +717,8 @@ return nil if LIB unfound and downloading failed, otherwise the path of LIB." (add-hook (kill-local-variable 'before-save-hook) 'js2-before-save))) -(and (require 'zone nil t) +(and nil + (require 'zone nil t) (not (eq system-type 'windows-nt)) ;; (zone-when-idle 180) (run-with-idle-timer 180 t (lambda () @@ -769,31 +770,37 @@ return nil if LIB unfound and downloading failed, otherwise the path of LIB." ;; (lambda (frame) ;; (recentf-open-files))) +;; (defvar aaa nil) +;; (plist-get aaa 'abc) +;; (setq aaa (plist-put aaa 'abc 'efg)) + (defvar my-frame-buffer-plist nil) -(setplist my-frame-buffer-plist nil) +;; (setplist my-frame-buffer-plist nil) (defun my-frame-buffer-add () "" - (put 'my-frame-buffer-plist - (selected-frame) - (let ((lst (my-frame-buffer-get))) - (if lst - (add-to-list 'lst - (current-buffer)) - (list (current-buffer)))))) + (setq my-frame-buffer-plist + (plist-put 'my-frame-buffer-plist + (selected-frame) + (let ((lst (my-frame-buffer-get))) + (if lst + (add-to-list 'lst + (current-buffer)) + (list (current-buffer))))))) (defun my-frame-buffer-remove () "" - (put 'my-frame-buffer-plist - (selected-frame) - (delq (current-buffer) - (my-frame-buffer-get)))) + (setq my-frame-buffer-plist + (plist-put 'my-frame-buffer-plist + (selected-frame) + (delq (current-buffer) + (my-frame-buffer-get))))) (defun my-frame-buffer-get (&optional frame) "" - (get 'my-frame-buffer-plist - (or frame - (selected-frame)))) + (plist-get 'my-frame-buffer-plist + (or frame + (selected-frame)))) (defun my-frame-buffer-get2 (&optional frame) "" @@ -1718,17 +1725,18 @@ when SEC is nil, stop auto save if enabled." (ansi-term "/bin/bash")))) (defvar my-frame-term-plist nil) -(setplist my-frame-term-plist nil) +;; (setplist my-frame-term-plist nil) (defun my-execute-or-find-term () "" (interactive) - (let* ((buf (get 'my-frame-term-plist (selected-frame)))) + (let* ((buf (plist-get 'my-frame-term-plist (selected-frame)))) (if (and buf (buffer-name buf)) (switch-to-buffer buf) - (put 'my-frame-term-plist - (selected-frame) - (my-term))))) + (setq my-frame-ter-plist + (plist-put 'my-frame-term-plist + (selected-frame) + (my-term)))))) (defun my-format-time-string (&optional time) "" From b054898338fc04cff17fcec164ba982ac01b1464 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Wed, 28 Dec 2011 21:43:15 +0900 Subject: [PATCH 07/24] run ~/.prompt.sh in prompt --- .bashrc | 1 + 1 file changed, 1 insertion(+) diff --git a/.bashrc b/.bashrc index b41ec85..65f9f01 100755 --- a/.bashrc +++ b/.bashrc @@ -306,6 +306,7 @@ prompt_function(){ # used by PS1 fi local svn=$(type svn >/dev/null 2>&1 && safe-cmd __my_svn_ps1 [SVN:%s]) printf "${_MEMO}" + printf "$(test -f ~/.prompt.sh && bash ~/.prompt.sh)\n" printf " [${c1}${pwd}${cdef}<${c3}${oldpwd}${cdef}]${git}${svn}\n" printf "${c2}${USER}@${HOSTNAME}${cdef} ${date} ${BASH} ${BASH_VERSION}\n" printf "shlv:${SHLVL} jobs:${jobnum} last:${lastreturn} " From f5d09a9c132f434beac08e2d6413cd954c60939c Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Fri, 30 Dec 2011 14:59:56 +0900 Subject: [PATCH 08/24] small changes --- .bashrc | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/.bashrc b/.bashrc index 65f9f01..4df5a94 100755 --- a/.bashrc +++ b/.bashrc @@ -57,7 +57,7 @@ export LESS="-iRMX" export GIT_PAGER="$PAGER" export GIT_EDITOR="$EDITOR" -alias ls="ls -CFG $(test "$TERM" == dumb || echo --color=auto) --time-style=long-iso" +alias ls="ls -hCFG $(test "$TERM" == dumb || echo --color=auto) --time-style=long-iso" alias ll="ls -l" alias la="ls -A" alias lla="ls -Al" @@ -77,6 +77,7 @@ alias psall="ps auxww" alias g=git alias q=exit alias pcalc="python -i -c 'from math import *' " +alias _myreloadrc="test -f ~/.bashrc && source ~/.bashrc" # alias diff="$(type colordiff >/dev/null 2>&1 && test $TERM != dumb && echo color)diff -u" # type trash >/dev/null 2>&1 && alias rm=trash From b51cbbb87e5f729628b8a63b16e63e5bb3cacf82 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Fri, 30 Dec 2011 15:00:24 +0900 Subject: [PATCH 09/24] remove comment --- .emacs.el | 3 --- 1 file changed, 3 deletions(-) diff --git a/.emacs.el b/.emacs.el index 39f319a..bdd4404 100644 --- a/.emacs.el +++ b/.emacs.el @@ -611,13 +611,10 @@ return nil if LIB unfound and downloading failed, otherwise the path of LIB." (add-hook 'diff-mode-hook (lambda () (view-mode 1) - ;; (set-face-foreground 'diff-file-header-face "black") (set-face-foreground 'diff-index-face "blue") (set-face-foreground 'diff-hunk-header-face "magenda") (set-face-foreground 'diff-removed-face "red") - ;; (set-face-background 'diff-removed-face "gray26") (set-face-foreground 'diff-added-face "blue") - ;; (set-face-background 'diff-added-face "gray26") (set-face-foreground 'diff-changed-face "syan") )) From dd0490c46a9654a714e6cbe2dedc1d2fa7bec4b9 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Fri, 30 Dec 2011 15:14:31 +0900 Subject: [PATCH 10/24] rename prompt function --- .bashrc | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/.bashrc b/.bashrc index 4df5a94..8ddd729 100755 --- a/.bashrc +++ b/.bashrc @@ -40,7 +40,7 @@ replace-cmd(){ test -r /etc/bashrc && . /etc/bashrc -export PS1="\$(prompt_function)\$ " +export PS1="\$(__my_prompt_function)\$ " # PROMPT_COMMAND=prompt_function if iswindows then @@ -271,7 +271,7 @@ replace-cmd date replace-cmd __my_svn_ps1 -prompt_function(){ # used by PS1 +__my_prompt_function(){ # used by PS1 local lastreturn=$? if test "${TERM}" == dumb then From ee3dd8bebf1c8272bd8dcece6d4038acbe18d16d Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Mon, 2 Jan 2012 05:14:14 +0900 Subject: [PATCH 11/24] fix CRUCIAL bug on frame buffer --- .emacs.el | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/.emacs.el b/.emacs.el index bdd4404..3d39e09 100644 --- a/.emacs.el +++ b/.emacs.el @@ -778,7 +778,7 @@ return nil if LIB unfound and downloading failed, otherwise the path of LIB." (defun my-frame-buffer-add () "" (setq my-frame-buffer-plist - (plist-put 'my-frame-buffer-plist + (plist-put my-frame-buffer-plist (selected-frame) (let ((lst (my-frame-buffer-get))) (if lst @@ -789,14 +789,14 @@ return nil if LIB unfound and downloading failed, otherwise the path of LIB." (defun my-frame-buffer-remove () "" (setq my-frame-buffer-plist - (plist-put 'my-frame-buffer-plist + (plist-put my-frame-buffer-plist (selected-frame) (delq (current-buffer) (my-frame-buffer-get))))) (defun my-frame-buffer-get (&optional frame) "" - (plist-get 'my-frame-buffer-plist + (plist-get my-frame-buffer-plist (or frame (selected-frame)))) @@ -1730,12 +1730,12 @@ when SEC is nil, stop auto save if enabled." (defun my-execute-or-find-term () "" (interactive) - (let* ((buf (plist-get 'my-frame-term-plist (selected-frame)))) + (let* ((buf (plist-get my-frame-term-plist (selected-frame)))) (if (and buf (buffer-name buf)) (switch-to-buffer buf) - (setq my-frame-ter-plist - (plist-put 'my-frame-term-plist + (setq my-frame-term-plist + (plist-put my-frame-term-plist (selected-frame) (my-term)))))) From 80c1a515b4aeb8707fc9aed1ce9089c9c127e08a Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Mon, 2 Jan 2012 05:14:29 +0900 Subject: [PATCH 12/24] make function _testjp --- .bashrc | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/.bashrc b/.bashrc index 8ddd729..43eaac9 100755 --- a/.bashrc +++ b/.bashrc @@ -403,7 +403,10 @@ fi ####################### -echo "Japanese letters are 表示可能" +_testjp(){ + echo "Japanese letters are 表示可能" +} +_testjp safe-cmd diskinfo From 96352814019fb944fce215b709ba0fafd23e6dfb Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Wed, 4 Jan 2012 03:19:54 +0900 Subject: [PATCH 13/24] display debian version when login --- .bashrc | 2 ++ 1 file changed, 2 insertions(+) diff --git a/.bashrc b/.bashrc index 43eaac9..a701aab 100755 --- a/.bashrc +++ b/.bashrc @@ -408,6 +408,8 @@ _testjp(){ } _testjp +test -f /etc/debian_version && echo Debian `cat /etc/debian_version` + safe-cmd diskinfo ! isdarwin && test -n "${DESKTOP_SESSION}" && type xrandr >/dev/null 2>&1 && { From 7417134d2eeca3ba637c5da6c9e78e0cc53ab9a3 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Wed, 4 Jan 2012 03:35:29 +0900 Subject: [PATCH 14/24] use vim as editor if available, change to cat /etc/issue.net --- .bashrc | 10 ++++++++-- 1 file changed, 8 insertions(+), 2 deletions(-) diff --git a/.bashrc b/.bashrc index a701aab..410d07f 100755 --- a/.bashrc +++ b/.bashrc @@ -48,7 +48,13 @@ then else export PAGER="less" fi -export EDITOR="vi" + +if type vim >/dev/null 2>&1 +then + export EDITOR=vim +else + export EDITOR=vi +fi export VISUAL="$EDITOR" export LESS="-iRMX" # export LC_MESSAGES="C" @@ -408,7 +414,7 @@ _testjp(){ } _testjp -test -f /etc/debian_version && echo Debian `cat /etc/debian_version` +test -f /etc/issue.net && cat /etc/issue.net safe-cmd diskinfo From 329c09b377c0458cf770c89ec01e776fb7952f49 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Wed, 4 Jan 2012 03:43:25 +0900 Subject: [PATCH 15/24] uname -a --- .bashrc | 1 + 1 file changed, 1 insertion(+) diff --git a/.bashrc b/.bashrc index 410d07f..8c356e8 100755 --- a/.bashrc +++ b/.bashrc @@ -414,6 +414,7 @@ _testjp(){ } _testjp +uname -a test -f /etc/issue.net && cat /etc/issue.net safe-cmd diskinfo From 7ca1184c8e4737cb3e481892fe53c27a1ecca7a5 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Wed, 4 Jan 2012 16:21:13 +0900 Subject: [PATCH 16/24] small changes, add alias upgrade --- .bashrc | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/.bashrc b/.bashrc index 8c356e8..501cbbd 100755 --- a/.bashrc +++ b/.bashrc @@ -69,8 +69,8 @@ alias la="ls -A" alias lla="ls -Al" # alias less="" alias vl=/usr/share/vim/vimcurrent/macros/less.sh -alias em="emacs -nw" -alias apt-get="sudo apt-get" +alias em="emacs -nw; echo emacs terminated." +# alias apt-get="sudo apt-get" alias aptin="apt-get install" alias aptsearch="apt-cache search" alias aptshow="apt-cache show" @@ -84,6 +84,11 @@ alias g=git alias q=exit alias pcalc="python -i -c 'from math import *' " alias _myreloadrc="test -f ~/.bashrc && source ~/.bashrc" +alias sudo="sudo " # use aliases through sudo +if isdarwin +then alias upgrade="port selfupdate && port sync && port upgrade installed" +else alias upgrade="sudo apt-get autoremove --yes && sudo apt-get update --yes && sudo apt-get upgrade --yes" +fi # alias diff="$(type colordiff >/dev/null 2>&1 && test $TERM != dumb && echo color)diff -u" # type trash >/dev/null 2>&1 && alias rm=trash @@ -234,9 +239,6 @@ dl-my-init-files(){ fi done } -port-autosync(){ - port selfupdate && port sync && port upgrade installed -} _mygitconfig(){ git config --global user.name '10sr' git config --global user.email '8slashes+git@gmail.com' From c0338b2d90d069e36d8b1f8cc358167390413f29 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Wed, 4 Jan 2012 16:24:22 +0900 Subject: [PATCH 17/24] / to isearch-forward in dired --- .emacs.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/.emacs.el b/.emacs.el index 3d39e09..515660c 100644 --- a/.emacs.el +++ b/.emacs.el @@ -62,7 +62,7 @@ (when (file-readable-p "~/.emacs") (load-file "~/.emacs")))) -(cd ".") ; when using windows use / instead of \ in default-directory +(cd ".") ; when using windows use / instead of \ in `default-directory' ;; locale (set-language-environment "Japanese") @@ -1372,6 +1372,7 @@ otherwise, use `pack-default-extension' for pack." (define-key dired-mode-map "P" 'my-dired-do-pack-or-unpack) (define-key dired-mode-map "a" 'my-dired-display-all-mode) (define-key dired-mode-map "h" 'my-dired-display-all-mode) + (define-key dired-mode-map "/" 'isearch-forward) (substitute-key-definition 'dired-advertised-find-file 'my-dired-find-file dired-mode-map) (substitute-key-definition 'dired-up-directory 'my-dired-up-directory dired-mode-map) (define-key dired-mode-map (kbd "DEL") 'my-dired-up-directory) From 629a0fc15dc5451c76d9568bc59c17faad792867 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Wed, 4 Jan 2012 19:09:02 +0900 Subject: [PATCH 18/24] add alias p and c --- .bashrc | 10 +++------- 1 file changed, 3 insertions(+), 7 deletions(-) diff --git a/.bashrc b/.bashrc index 501cbbd..30175b1 100755 --- a/.bashrc +++ b/.bashrc @@ -69,7 +69,7 @@ alias la="ls -A" alias lla="ls -Al" # alias less="" alias vl=/usr/share/vim/vimcurrent/macros/less.sh -alias em="emacs -nw; echo emacs terminated." +alias em="emacs -nw; echo Emacs terminated." # alias apt-get="sudo apt-get" alias aptin="apt-get install" alias aptsearch="apt-cache search" @@ -82,6 +82,8 @@ alias destroy="rm -rf" alias psall="ps auxww" alias g=git alias q=exit +alias p="$PAGER" +alias c=cat alias pcalc="python -i -c 'from math import *' " alias _myreloadrc="test -f ~/.bashrc && source ~/.bashrc" alias sudo="sudo " # use aliases through sudo @@ -191,12 +193,6 @@ setclip(){ fi fi } -p(){ - "$@" | $PAGER -} -c(){ - "$@" | cat -} o(){ if [ $# -eq 0 ] then From e047ba6bc17993cb1085c42b1c180b6b60abb9ed Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Thu, 5 Jan 2012 01:02:29 +0900 Subject: [PATCH 19/24] display time needed for setup after init --- .emacs.el | 13 ++++++++++--- 1 file changed, 10 insertions(+), 3 deletions(-) diff --git a/.emacs.el b/.emacs.el index 515660c..c2e8ca1 100644 --- a/.emacs.el +++ b/.emacs.el @@ -62,6 +62,13 @@ (when (file-readable-p "~/.emacs") (load-file "~/.emacs")))) +(add-hook 'after-init-hook + (lambda () + (message "init time: %d msec" + (+ (* (- (nth 1 after-init-time) (nth 1 before-init-time)) 1000) + (/ (- (nth 2 after-init-time) (nth 2 before-init-time)) 1000))) + (switch-to-buffer "*Messages*"))) + (cd ".") ; when using windows use / instead of \ in `default-directory' ;; locale @@ -1353,9 +1360,9 @@ otherwise, use `pack-default-extension' for pack." ;; (add-hook 'dired-after-readin-hook ;; 'my-replace-nasi-none) -(add-hook 'after-init-hook - (lambda () - (dired "."))) +;; (add-hook 'after-init-hook +;; (lambda () +;; (dired "."))) (add-hook 'dired-mode-hook (lambda () From 5e4ebd188995cf620527969c217f5205c51b5038 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Fri, 6 Jan 2012 05:54:52 +0900 Subject: [PATCH 20/24] use `switch-to-buffer --- .emacs.el | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) diff --git a/.emacs.el b/.emacs.el index c2e8ca1..cf90114 100644 --- a/.emacs.el +++ b/.emacs.el @@ -64,10 +64,12 @@ (add-hook 'after-init-hook (lambda () - (message "init time: %d msec" - (+ (* (- (nth 1 after-init-time) (nth 1 before-init-time)) 1000) - (/ (- (nth 2 after-init-time) (nth 2 before-init-time)) 1000))) - (switch-to-buffer "*Messages*"))) + ;; (message "init time: %d msec" + ;; (+ (* (- (nth 1 after-init-time) (nth 1 before-init-time)) 1000) + ;; (/ (- (nth 2 after-init-time) (nth 2 before-init-time)) 1000))) + (message (emacs-init-time)) + (switch-to-buffer "*Messages*") + )) (cd ".") ; when using windows use / instead of \ in `default-directory' From 86792d04119f28b4d3876cc1bb2b65b9235ba82c Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Fri, 6 Jan 2012 05:55:42 +0900 Subject: [PATCH 21/24] remove put-aside-this-page from keybind and make it a ext --- .keysnail.js | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) diff --git a/.keysnail.js b/.keysnail.js index 1d0ae32..e9b7c38 100644 --- a/.keysnail.js +++ b/.keysnail.js @@ -182,6 +182,14 @@ plugins.options["twitter_client.use_jmp"] = true; //////////////////////////////////////////// // エクステ +ext.add('put-aside-this-page', function (ev, arg) { + var n = gBrowser.mCurrentTab._tPos; + gBrowser.moveTabTo(gBrowser.mCurrentTab, 0); + if (n != 0) { + gBrowser.selectedTab = gBrowser.mTabs[n]; + } +}, 'put aside this page'); + ext.add('send-escape', function (ev, arg) { ev.target.dispatchEvent(key.stringToKeyEvent("ESC", true)); }, 'escape'); @@ -678,14 +686,6 @@ key.setViewKey('C-SPC', function (ev, arg) { MultipleTabService.toggleSelection(gBrowser.selectedTab); }, 'タブの選択をトグル'); -key.setViewKey('s', function (ev, arg) { - var n = gBrowser.mCurrentTab._tPos; - gBrowser.moveTabTo(gBrowser.mCurrentTab, 0); - if (n != 0) { - gBrowser.selectedTab = gBrowser.mTabs[n]; - } -}, 'このタブを保持する'); - key.setViewKey('U', function (ev, arg) { ext.exec("list-closed-tabs", arg, ev); }, 'List closed tabs', true); From c2fbfe5e1467324602604be3152192159513b872 Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Sat, 7 Jan 2012 00:31:21 +0900 Subject: [PATCH 22/24] cleanse code --- .keysnail.js | 68 +++++++++++++++++++++++----------------------------- 1 file changed, 30 insertions(+), 38 deletions(-) diff --git a/.keysnail.js b/.keysnail.js index e9b7c38..fe80a4f 100644 --- a/.keysnail.js +++ b/.keysnail.js @@ -194,14 +194,36 @@ ext.add('send-escape', function (ev, arg) { ev.target.dispatchEvent(key.stringToKeyEvent("ESC", true)); }, 'escape'); - - ext.add("open-hatebu-comment", function (ev, arg) { if (window.loadURI) { loadURI("javascript:location.href='http://b.hatena.ne.jp/entry?mode=more&url='+escape(location.href);"); } }, 'hatebu'); +ext.add("fullscreen-page",function (ev) { + getBrowser().selectedTab = getBrowser().addTab("http://home.tiscali.nl/annejan/swf/timeline.swf"); + BrowserFullScreen(); +}, "fullscreen page"); + +ext.add("focus-on-content", function(){ + let(elem = document.commandDispatcher.focusedElement) elem && elem.blur(); + gBrowser.focus(); + content.focus(); +}, "forcus on content"); + +ext.add("hide-sidebar", function(){ + var sidebarBox = document.getElementById("sidebar-box"); + if (!sidebarBox.hidden) { + toggleSidebar(sidebarBox.getAttribute("sidebarcommand")); + } +}, "hide-sidebar"); + +ext.add("close-and-next-tab", function (ev, arg) { + var n = gBrowser.mCurrentTab._tPos; + BrowserCloseTabOrWindow(); + gBrowser.selectedTab = gBrowser.mTabs[n]; +}, "close and focus to next tab"); + ///////////////////////////////////// // google itranslate (function(){ @@ -278,13 +300,6 @@ ext.add("restart-firefox-add-menu", function(){ menu.appendChild(menuelm); }, "add restart firefox menu"); -////////////////////////////////////// -// -ext.add("fullscreen-page",function (ev) { - getBrowser().selectedTab = getBrowser().addTab("http://home.tiscali.nl/annejan/swf/timeline.swf"); - BrowserFullScreen(); -}, "fullscreen page"); - ////////////////////////////////////// // restart firefox // http://keysnail.g.hatena.ne.jp/Shinnya/20100723/1279878815 @@ -500,31 +515,6 @@ ext.add("echo-closed-tabs", function () { }, "List closed tabs"); -/////////////////////////////////////// -// -ext.add("focus-on-content", function(){ - document.getElementById("searchbar").focus(); - document.commandDispatcher.advanceFocus(); - document.commandDispatcher.advanceFocus(); -}, "forcus on content"); - -ext.add("_focus-on-content", function(){ - gBrowser.focus(); - _content.focus(); -}, "focus on content"); - -ext.add("hide-sidebar", function(){ - var sidebarBox = document.getElementById("sidebar-box"); - if (!sidebarBox.hidden) { - toggleSidebar(sidebarBox.getAttribute("sidebarcommand")); - } -}, "hide-sidebar"); - -ext.add("close-and-next-tab", function (ev, arg) { - var n = gBrowser.mCurrentTab._tPos; - BrowserCloseTabOrWindow(); - gBrowser.selectedTab = gBrowser.mTabs[n]; -}, "close and focus to next tab") //}}%PRESERVE% // ========================================================================= // @@ -548,6 +538,12 @@ hook.setHook('KeySnailInitialized', function () { }); hook.setHook('KeyBoardQuit', function (aEvent) { + ext.exec("hide-sidebar"); + + let(elem = document.commandDispatcher.focusedElement) elem && elem.blur(); + gBrowser.focus(); + content.focus(); + command.closeFindBar(); if (util.isCaretEnabled()) { command.resetMark(aEvent); @@ -557,10 +553,6 @@ hook.setHook('KeyBoardQuit', function (aEvent) { key.generateKey(aEvent.originalTarget, KeyEvent.DOM_VK_ESCAPE, true); }); hook.addToHook('KeyBoardQuit', function (aEvent) { - ext.exec("hide-sidebar"); - let(elem = document.commandDispatcher.focusedElement) elem && elem.blur(); - gBrowser.focus(); - content.focus(); }); hook.setHook('Unload', function () { From e9e8165cc603cd52bf0cc65180827246547f130c Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Sat, 7 Jan 2012 00:31:40 +0900 Subject: [PATCH 23/24] changed back em alias --- .bashrc | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/.bashrc b/.bashrc index 30175b1..ca15a9f 100755 --- a/.bashrc +++ b/.bashrc @@ -69,7 +69,7 @@ alias la="ls -A" alias lla="ls -Al" # alias less="" alias vl=/usr/share/vim/vimcurrent/macros/less.sh -alias em="emacs -nw; echo Emacs terminated." +alias em="emacs -nw" # alias apt-get="sudo apt-get" alias aptin="apt-get install" alias aptsearch="apt-cache search" From 0e3cbb8d0b7f857e60f688729a7badffcb7c6e5b Mon Sep 17 00:00:00 2001 From: 10sr <8slashes+git@gmail.com> Date: Sun, 8 Jan 2012 16:34:10 +0900 Subject: [PATCH 24/24] do not use trash-directory --- .emacs.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/.emacs.el b/.emacs.el index cf90114..0323271 100644 --- a/.emacs.el +++ b/.emacs.el @@ -433,8 +433,8 @@ emacs-major-version (setq auto-save-list-file-prefix (expand-file-name "~/.emacs.d/autosave/")) (setq delete-auto-save-files t) -(setq delete-by-moving-to-trash t - trash-directory "~/.emacs.d/trash") +;; (setq delete-by-moving-to-trash t +;; trash-directory "~/.emacs.d/trash") ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; gmail