xyzzyファイラーを使いはじめるときにしておきたい代表的な設定

ファイル名: -
;ファイラで全ファイル表示をデフォルトに
;デフォルトのマスクを全ファイルに
;; 2 画面用
(setq *filer-primary-file-mask* '("*"))
(setq *filer-secondary-file-mask* '("*"))
;; 1 画面用
(setq *filer-last-file-mask* '("*"))

(setq *filer-modal* nil)
(setq *filer-use-recycle-bin* t) ; ごみはごみ箱へ

;*filer-path-masks*
(push "*.dat" (cdr (assoc-equal "ドキュメント" *filer-path-masks*))) ;"*.dat" "*.log" "*.txt"に
(push '("Java" "*.java") *filer-path-masks*)
(push '("HTML" "*.htm?") *filer-path-masks*)
(push '("Script" "*.cgi" "*.rb" "*.pl" "*.py" "*.php" "*.js" ) *filer-path-masks*)
(defun assoc-equal (item a-list)
  (interactive)
  (catch 'exit-assoc-string
	  (let (nf (i 0))
		(while (setq nf (nth i a-list))
		  (if (equal item (car nf))
			  (throw 'exit-assoc-string nf))
		  (incf i)))))
 
Delicious にシェア
Digg にシェア
reddit にシェア
LinkedIn にシェア
LINEで送る
email this
Pocket

2,072 views.



コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です