Tools

Tools †

Tools

Firefox †

拡張一覧

All-in-One Gestures
All-In-One Sidebar
でもサイドバーのトリガーさえあればいいので、そういう拡張ないだろうか
Autoclose Bookmark&History Folders
bbs2chreader
FireBug
Gmail Notifier
Google Toolbar for Firefox
IE View
Menu Editor
MR Tech Local Install
OpenBook
Scroll With IME
SwiftTabs
Tab Mix Plus
UnMHT
合間合間に
赤福

テーマ

~~macfox~~
~~SphereGnome~~
~~Mostly Crystal~~
~~SphereGnome?じゃFirefox2上で多段タブ化している時の挙動がやや不信なので最近はこっちを~~
rein
TMPのタブクローズボタンをマウスオーバーで表示させる設定にしていた場合
対応しているテーマはこれぐらいしか知らない
シンプルなデザインでとても好き

以上でSleipnir2に（個人的な使用法では）負けない機能が十分に揃う

クイックサーチ †

Youtube
http://youtube.com/results?search_query=%s&search_type=search_videos&search_sort=relevance

Wikipedia ja
http://ja.wikipedia.org/wiki/Special:Search?search=%s

適当な検索のフォームで右クリックから「この検索にキーワードを設定」から登録
C-lでロケーションバーにフォーカスを移してy 検索ワード、等…

Firefox2 †

TMPで設定してても、検索結果が新しいタブで開かない
```
browser.search.openintab => true
```
BXが使えない
- Autoclose Bookmark&History Folders使え

Synergy †

異なるPCで1つのキーボード、マウス、クリップボードを共有するソフトウェア
Synergy日本語キーパッチ
デフォルトでは、半角/全角キーが通らないので上記からバイナリ落とす

でもAlt+半角/全角じゃないとIME on/offできない
JISキーボードだと辛い

HHKライクなASCIIキーボードが欲しい

VM Player †

VMPlayerをインストール
QEMUをインストール
```
qemu create -f vmdk PATH SIZE
```

*.vmxを作成

config.version = "8"
virtualHW.version = "3"
memsize = "256"
ide0:0.present = "TRUE"
ide0:0.fileName = "debian.vmdk"
ide1:0.present = "TRUE"
ide1:0.fileName = "debian-31r2-i386-netinst.iso"
ide1:0.deviceType = "cdrom-image"
ethernet0.present = "TRUE"
ethernet0.connectionType = "nat"
usb.present = "TRUE"
sound.present = "TRUE"
sound.virtualDev = "es1371"
displayName = "Debian GNU/Linux"
guestOS = "other26xlinux"
nvram = "debian.nvram"
scsi0:0.redo = ""
ethernet0.addressType = "generated"
uuid.location = "56 4d 66 ce 39 a4 bd 06-86 74 8c ea 04 ab 35 56"
uuid.bios = "56 4d 66 ce 39 a4 bd 06-86 74 8c ea 04 ab 35 56"
ide1:0.autodetect = "TRUE"
ethernet0.generatedAddress = "00:0c:29:ab:35:56"
ethernet0.generatedAddressOffset = "0"
checkpoint.vmState = "debian.vmss"
tools.remindInstall = "TRUE"
ide0:0.redo = ""

VMPlayerを起動してF2でBIOS設定
インストール

CDドライブの設定を直す

ide1:0.fileName = "auto detect"
ide1:0.deviceType = "cdrom-raw"

ネットワーク切り替えアプリケーションが正常に動作しなくなる？ †

ちなみに、私の持ち歩きノートにインストールした途端に
ネットワーク切り替えソフトが意図した通りに自動切換えしてくれなくなりました
どうやらVMware Playerインストール時にネットワークカードが
2つ追加されていたのが原因のようで
それぞれのTCP/IPのプロパティの中から"自動メトリック"を解除して
適当な値（100くらい）に設定してあげると解決しました
もし同じような症状に悩む方は一度お試しあれ。

xyzzy †

.xyzzyとsiteinit.lの設定

;.xyzzy
;; KaTeX Setting
(push "C:/Program Files/xyzzy/site-lisp/katex" *load-path*)
(require "elisp")
(push '("\\.tex$" . elisp::katex-mode) *auto-mode-alist*)
(autoload 'elisp::katex-mode "katex" t)

;; バックアップファイルはカレントに作られると困る
(require "backup")
(setq *backup-directory* "D:/backup")
(setq *hierarchic-backup-directory* t)

; siteinit.l
;; インクリメンタルサーチ
(require "isearch")

;; 一発インデント
(defun indent-current-buffer ()
  (interactive)
  (indent-region (point-min) (point-max))
  (message "indent buffer"))
(global-set-key #\C-F8 'indent-current-buffer)

;; Cのインデント変更
(setq c-indent-level 4)
(setq c-continued-statement-offset 4)
(setq c-argdecl-indent 4)
(setq c-brace-offset -4)
(setq c-brace-imaginary-offset 0)
(setq c-label-offset -4)
(setq c-comment-indent 4)
(setq *c-indent-tabs-mode* t)

;; C++のインデント変更
(setq c++-indent-level 4)
(setq c++-continued-statement-offset 4)
(setq c++-argdecl-indent 4)
(setq c++-brace-offset -4)
(setq c++-brace-imaginary-offset 0)
(setq c++-label-offset -4)
(setq c++-comment-indent 4)
(setq *c++-indent-tabs-mode* t)

;; Javaのインデント変更
(setq java-indent-level 4)
(setq java-continued-statement-offset 4)
(setq java-argdecl-indent 4)
(setq java-brace-offset -4)
(setq java-brace-imaginary-offset 0)
(setq java-label-offset -4)
(setq java-comment-indent 4)
(add-hook 'ed::*java-mode-hook*
		  #'(lambda ()
			  (ed::set-buffer-local 'indent-tabs-mode t)))
 
; Emacs key bind
(global-set-key #\C-/ 'undo)
(global-set-key #\M-v 'previous-page)
(global-set-key #\M-% 'replace-string)
(global-set-key #\C-M-% 'replace-regexp)
(global-set-key #\C-M-\\ 'indent-region)
(global-set-key '(#\C-x #\h) 'mark-page)
(global-set-key '(#\C-x #\u) 'undo)
(global-set-key '(#\C-x #\r #\d) 'delete-rectangle)
(global-set-key '(#\C-x #\r #\k) 'kill-rectangle)
(global-set-key '(#\C-x #\r #\o) 'open-rectangle)
(global-set-key '(#\C-x #\r #\t) 'string-rectangle)
(global-set-key '(#\C-x #\r #\y) 'yank-rectangle)
(global-set-key '(#\C-x #\r #\w) 'copy-rectangle)
(global-set-key #\Home 'beginning-of-buffer)
(global-set-key #\End 'end-of-buffer)

;; C-x h で バッファ内全範囲指定
(defun mark-whole-buffer ()
  (interactive)
  (end-of-buffer)
  (set-mark (point-max))
  (beginning-of-buffer))
(global-set-key '(#\C-x #\h) 'mark-whole-buffer)

;; カレントバッファを閉じる
(global-set-key #\C-F4 'close-selected-buffer)

;; リージョンとクリップボードの完全同期
(global-set-key #\C-w 'kill-region-to-clipboard)
;; Copy-region-to-clipboard[M-w]
(global-set-key #\M-w 'copy-region-to-clipboard)
;; Clipboardからコピー[C-y]
(global-set-key #\C-y 'paste-from-clipboard)
;; kill-line-to-clipboard を定義する（ついでにクリップボードに溜め込む）
(defun kill-line-to-clipboard (&optional arg)
  (interactive "*p")
  (cond ((bolp)
		 (let ((point (point))
			   (lines (cond ((or (null arg)
							(<= arg 1))
							 0)
							(t
							 (- arg 1)))))
		   (kill-region point
						(progn
						  (forward-line lines)
						  (goto-eol)
						  (forward-char)
						  (point)))))
		(t
		 (kill-line arg)))
  (copy-to-clipboard (apply #'concat (car ed::*kill-ring*))))
;; C-k に割り当て
(global-set-key '(#\C-k) 'kill-line-to-clipboard)

;; 新Ruby-mode
(load-library "ruby-mode")
(push '("\\.rb$" . ruby-mode) *auto-mode-alist*)
;; インデント量を変える。nilの時はタブを挿入
(setq *ruby-indent-column* 3)
;; endでインデントレベルを下げる
(defun ruby-end (&optional (arg 1))
  (interactive "*p")
  (insert "d")
  (if (and (not (eq (parse-point-syntax) :string)) (looking-back "end"))
	  (ed::ruby-indent-line)))
(defun set-keybind()
  (define-key *ruby-mode-map* #\d 'ruby-end))
(add-hook 'editor::*ruby-mode-hook* 'set-keybind)
;(setq *ruby-information-command* "G:/binbin/ri")

;; PHP-mode
(load-library "php-mode")
(pushnew '("\\.php$" . php-mode) *auto-mode-alist*)

;; jscript-mode
(load-library "jscript-mode")
(export '(ed::*jscript-mode-map*
		  ed::*jscript-mode-hook*
		  ed::*jscript-indent-tabs-mode*
		  ed::*jscript-comment-column*
		  ed::*jscript-mode-script-host*
		  ed::jscript-mode
		  ed::jscript-comment-indent
		  ed::jscript-mode-execute
		  ed::jscript-mode-toggle-script-host) "ed")
(autoload 'jscript-mode "jscript-mode" t)
(push '("\\.js$" . jscript-mode) *auto-mode-alist*)

;; html+-mode
(export 'ed::html+-mode "ed")
(autoload 'html+-mode "html+-mode" t)
(pushnew '("\\.s?html?$" . html+-mode) *auto-mode-alist* :test 'equal)
(setq ed::*html+-use-html-kwd* t)
; space indent in html+-mode
(add-hook 'ed::*html+-mode-hook*
		  #'(lambda ()
			  (ed::set-buffer-local 'indent-tabs-mode nil)))
;; html+-modeはインデント2
(defvar ed::*html+-indent-column* 2)

;; xml-mode
(require "xml/xml-mode")
(use-package 'xml)
; (require "xml/xhtml")
(require "xml/xyzref")

;; csv-mode
(in-package "editor")
(export '(csv-mode tsv-mode))
(autoload 'csv-mode "csv-mode" t)
(autoload 'tsv-mode "csv-mode" t)
(pushnew '("\\.csv$" . csv-mode) *auto-mode-alist* :test 'equal)
(pushnew '("\\.tsv$" . csv-mode) *auto-mode-alist* :test 'equal)
(in-package "user")

;;PATH for TeX Compiler (default is jlatex)
(setq tex-command "d:/cygwin/usr/local/bin/platex")
;;PATH for dviout
(setq dvi2-command "d:/cygwin/usr/local/bin/dviout &") 

;; ディレクトリにあるファイルの文字コードを変換する（コピペ）
;;; Code
(defun conv-fileio-code-dir (dir wild code)
  (interactive "DDir: \nsWild: \nnCode(s-jis=0, jis=1, euc=2): ")
  (let ((files (directory dir
						  :wild wild
						  :file-only t))
		nl-code)
	(setq nl-code (if (= code 0) 1 0))
	(set-buffer (create-new-buffer "*WORK*"))
	(set-default-directory dir)
	(dolist (file files)
	  (erase-buffer (selected-buffer))
	  (ed::insert-file-contents file t)
	  (set-buffer-file-name file)
	  (unless (and (= (buffer-kanji-fileio-code) code)
				   (= (buffer-newline-code) nl-code))
		(set-buffer-kanji-fileio-code code)
		(set-buffer-newline-code nl-code)
		(set-buffer-modified-p t)
		(save-buffer)))
	(delete-buffer (selected-buffer))
	))

;; デフォルトの文字コードをEUC-JPに
(setq *default-fileio-encoding* *encoding-euc-jp*
	  *default-eol-code* *eol-lf*)
(save-excursion
  (set-buffer "*scratch*")
  (change-fileio-encoding *encoding-euc-jp*)
  (change-eol-code *eol-lf*))

;; 以下browser-mode.lよりコピペ
(require "win-window")
(require "browserex")
(setq bx:*browser-width* 300)
(setq bx:*browser-height* 200)
(setq bx:*browser-start-page* "http://www.google.com/search?hl=ja&lr=lang_ja&num=100&q=")
(setq bx:*browser-temp-file* (merge-pathnames "tmp/browser-temp.html" (si:system-root)))
;(setq bx:*browser-syslistview-style* bx:LVS_LIST)
;(setq bx:*browser-use-refresh* t)

(global-set-key #\M-F9 'bx:navigate-current-buffer)
(set-function-bar-label #\M-F9 "OpenBrowser")
(global-set-key #\M-F10 'bx:navigate-current-buffer-directory)
(set-function-bar-label #\M-F10 "OpenDir")
(global-set-key #\M-F11 'bx:rotate-browser)
(set-function-bar-label #\M-F11 "RotateBrowser")
(global-set-key #\M-F12 'bx:close-browser)
(set-function-bar-label #\M-F12 "CloseBrowser")
;(global-set-key #\RBtnUp 'bx:browserex-mouse-menu-popup)
;(global-set-key #\Apps 'bx:browserex-apps-popup)

;; ndiary-mode から拝借。
(require "wip/winapi")
(defun toggle-navigate-current-buffer ()
  (interactive)
  (cond
   ((bx:browser-open-p)
	(bx:close-browser)
	(winapi:ShowWindow (get-window-handle) 9))
   (t
	(winapi:ShowWindow (get-window-handle) 3)
	(bx:navigate-current-buffer :position bx:XPIS_LEFT
								:size 480))))
(global-set-key #\M-F8 'toggle-navigate-current-buffer)
(set-function-bar-label #\M-F8 "ToggleBrowser") 
(global-set-key #\M-Up 'bx:browserex-scroll-up)
(global-set-key #\M-Down 'bx:browserex-scroll-down)
(global-set-key #\M-Left 'bx:browserex-scroll-left)
(global-set-key #\M-Right 'bx:browserex-scroll-right)
(global-set-key #\M-PageUp #'(lambda () (interactive) (bx:browserex-scroll-up :unit :page)))
(global-set-key #\M-PageDown #'(lambda () (interactive) (bx:browserex-scroll-down :unit :page)))
(global-set-key #\M-Home #'(lambda () (interactive) (bx:browserex-scroll-up :unit :all)))
(global-set-key #\M-End #'(lambda () (interactive) (bx:browserex-scroll-down :unit :all))) 

;; いまいたけを さん拡張版
(global-set-key #\M-F7 'bx:show-location-browser)
(set-function-bar-label #\M-F7 "ShowLocation")
(global-set-key #\S-M-Left 'bx:go-back-browser)
(global-set-key #\S-M-Right 'bx:go-forward-browser)
(global-set-key #\S-M-Home 'bx:go-home-browser)

;; browser.l もどき設定。
(defun navigate (url)
  (interactive "sURL: ")
  (bx:navigate url))
(defun refresh-browser ()
  (interactive)
  (bx:refresh-browser))
(defun close-browser ()
  (interactive)
  (bx:close-browser))

(defun my-html+-mode-hook ()
  ; ------------------------------------------------------------
  ;; browser が開いていたら現在のファイルを表示
  (bx:navigate-current-buffer-if-open)

  ;; 保存と同時に navigate
  ;; auto-time-stamp.l の save-buffer-with-time-stamp を使っている場合に対応
  (define-key ed::*html+-mode-map* '(#\C-x #\C-s)
			  #'(lambda ()
				  (interactive)
				  (if (fboundp 'save-buffer-with-time-stamp)
					  (save-buffer-with-time-stamp)
					(save-buffer))
				  (bx:navigate-current-buffer-if-open)))

  ; ------------------------------------------------------------
  ; html+-mode で htmllint を使って構文チェック (CGI)
  (defvar *htmllint-url* "http://localhost/htmllint/htmllint.cgi?V;X=w3m;URL=")
  (defun htmllint-cgi ()
	(interactive)
	(let ((file (get-buffer-file-name)))
	  (when file
		(bx:close-browser)
		(bx:navigate (concat *htmllint-url* file)))))
  (define-key ed::*html+-mode-map* '(#\C-c #\C-l) 'htmllint-cgi)
  (define-key ed::*html+-mode-map* #\M-F7 'htmllint-cgi)
  (set-function-bar-label #\M-F7 "htmllint")

  ; ------------------------------------------------------------
  ; html+-mode で htmllint を使って構文チェック
  (defvar *htmllint-file* "D:/cygwin/home/sayless/htdocs/htmllint")
  (defun htmllint-exec ()
	(interactive)
	(let ((file (get-buffer-file-name)))
	  (when file
		(pipe-command
		 (format nil "perl \"~A\" \"~A\""
				 (map-slash-to-backslash *htmllint-file*)
				 (map-slash-to-backslash file))))))
  (define-key ed::*html+-mode-map* '(#\C-c #\l) 'htmllint-exec))
(add-hook 'ed::*html+-mode-hook* 'my-html+-mode-hook)

正しい文字コードで開きなおし †

C-u M-x revert-buffer [sjis/euc-jp/utf8]

C-u C-x C-v
正しい文字コードを指定して開き直し

最新の20件