by shigemk2

当面は技術的なことしか書かない

ディレクトリとファイルのチェック

(directory-files "~/junk/")		; => ("." ".." "2012")
(directory-files "~/junk/" t)		; => フルパス
(directory-files "~/junk/" nil "2")	; => ("2012") 正規表現
(directory-files "~/junk/" nil nil t)	; => ("2012" ".." ".") ソート
;; ファイルが存在するとき
(file-exists-p "/usr/bin/emacs")	; => t
;; ファイルに読み込み権限があるとき
(file-readable-p "/usr/bin/emacs")	; => t
;; ファイルに書き込み権限があるとき
(file-writable-p "/usr/bin/emacs")	; => nil
;; ファイルに実行権限があるとき
(file-executable-p "/usr/bin/emacs")	; => t
;; シンボリックリンクであるとき
(file-symlink-p "/usr/bin/emacs")	; => nil
;; ディレクトリであるとき
(file-directory-p "/usr/bin/emacs")	; => nil
;; 通常のファイル
(file-regular-p "/usr/bin/emacs")	; => t
;; 絶対パス
(file-name-absolute-p "usr/bin/emacs")	; => nil

P122

Emacs Lispテクニックバイブル

Emacs Lispテクニックバイブル