nos.hateblo.jp
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; 編集ファイルをエクスプローラで表示
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(global-set-key #\C-F11
#'(lambda ()
(interactive)
(setq current_file_path (map-slash-to-backslash (directory-namestring (get-buffer-file-name))))
; (setq command (concat "explorer.exe " current_file_path))
(setq command (concat "C:\\Program Files\\HmFilerClassic\\HmFilerClassic.exe " current_file_path))
(call-process command )))
- 非常に便利そうな関数を発見したので、一部修正して使わせていただくことに。explorer.exe -> HmFilerClassic.exeに変更であります。
- せっかくなので外部関数として定義したかったのだけど、冒頭にdefun () (interactive)を挿入しただけでは動きませんでした。orz
