dired 이맥스에서 쉘 명령을 실행하기 위해 키를 바인딩하는 방법

Question

이맥스에서 dired 모드를 사용할 때! xxx 형식의 쉘 명령을 실행할 수 있지만이 명령을 실행하기 위해 키를 바인딩하는 방법은 무엇입니까? 예를 들어 파일의 O를 누르면 dired는 'cygstart'를 실행하여이 파일을 엽니 다. 감사합니다. .

Answer 1

shell-command 기능을 사용할 수 있습니다. 예를 들어 :

(defun ls() 
    "Lists the contents of the current directory." 
    (interactive) 
    (shell-command "ls")) 

(global-set-key (kbd "C-x :") 'ls); Or whatever key you want... 

는 단일 버퍼에있는 명령을 정의하려면 local-set-key를 사용할 수 있습니다. dired에서 dired-file-name-at-point을 사용하여 포인트에서 파일 이름을 가져올 수 있습니다. 그래서, 당신은 질문을 정확히 수행하는 :

(defun cygstart-in-dired() 
    "Uses the cygstart command to open the file at point." 
    (interactive) 
    (shell-command (concat "cygstart " (dired-file-name-at-point)))) 
(add-hook 'dired-mode-hook '(lambda() 
           (local-set-key (kbd "O") 'cygstart-in-dired))) 

Answer 2

;; this will output ls 
(global-set-key (kbd "C-x :") (lambda() (interactive) (shell-command "ls"))) 

;; this is bonus and not directly related to the question 
;; will insert the current date into active buffer 
(global-set-key (kbd "C-x :") (lambda() (interactive) (insert (shell-command-to-string "date")))) 

lambda 대신 익명 함수를 정의합니다. 그렇게하면 다른 단계에서 키에 바인딩되는 도우미 함수를 정의 할 필요가 없습니다.

lambda이 키워드이고, 다음 괄호 쌍이 필요한 경우 인수를 포함합니다. 나머지는 정규 함수 정의와 유사합니다.