首页
学习
活动
专区
工具
TVP
发布
社区首页 >问答首页 >在Emacs中,如何在shell-command中插入文件名?

在Emacs中,如何在shell-command中插入文件名?
EN

Stack Overflow用户
提问于 2009-01-18 15:50:22
回答 3查看 5.3K关注 0票数 20

我使用shell-command a lot(默认绑定到M-!),但我经常对当前正在编辑的缓冲区执行操作。与其键入缓冲区名称(并且在shell命令中没有可用的文件名补全功能,唉!),不如有一个快捷键,比如f3,以便在我按下该键时为我插入该名称。

问题是我不想全局绑定键(我在其他上下文中使用f3来做其他事情),只有在shell命令提示时才在minibuffer中绑定。编写一个lisp函数来插入当前的缓冲区名称很容易,但是我应该修改哪个模式的快捷键映射来将键绑定到该函数?

或者,是否有任何lisp代码/包可以在shell-command中提供文件名完成,类似于bash是如何完成的?我知道普通的M-x shell可以完成任务,但是在minibuffer中输入命令的便利性是很难放弃的;)

编辑:

这是我想要的,取自huaiyuan的答案,以及受http://osdir.com/ml/emacs.sources/2002-04/msg00022.html启发/窃取的一些修复。

代码语言:javascript
复制
(define-key minibuffer-local-map
  [f3] (lambda () (interactive) 
       (insert (buffer-name (current-buffer-not-mini)))))

(defun current-buffer-not-mini ()
  "Return current-buffer if current buffer is not the *mini-buffer*
  else return buffer before minibuf is activated."
  (if (not (window-minibuffer-p)) (current-buffer)
      (if (eq (get-lru-window) (next-window))
          (window-buffer (previous-window)) (window-buffer (next-window)))))
EN

回答 3

Stack Overflow用户

回答已采纳

发布于 2009-01-18 16:05:45

代码语言:javascript
复制
(define-key minibuffer-local-map
  [f3] (lambda () (interactive) (insert (buffer-name))))

编辑:

正如在注释部分和其他地方指出的,上面的代码片段不起作用。(对不起,我应该在发帖前测试一下。:)已经发布了一些修复;下面是另一个修复:

代码语言:javascript
复制
(define-key minibuffer-local-map [f3]
  (lambda () (interactive) 
     (insert (buffer-name (window-buffer (minibuffer-selected-window))))))

关于发出shell-command时的文件名补全,也许这个杂乱无章的东西可以工作(它适用于我在Emacs23.0.60上):

代码语言:javascript
复制
(require 'shell)
(define-key minibuffer-local-map (kbd "C-i") 'comint-dynamic-complete)
票数 11
EN

Stack Overflow用户

发布于 2009-01-18 17:19:57

以下是如何修复怀远的解决方案:

代码语言:javascript
复制
(define-key minibuffer-local-map [f3]
  (lambda() (interactive) (insert (buffer-file-name (nth 1 (buffer-list))))))

您可能应该添加某种类型的错误检查,以防“其他”缓冲区没有设置文件名,并且( buffer - file - name )返回nil。

票数 7
EN

Stack Overflow用户

发布于 2009-01-18 16:16:53

我将遵从huaiyuan的要求,但您也可以查看Filtering text through a shell command in Emacs作为一种可能的替代方法。

票数 2
EN
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接:

https://stackoverflow.com/questions/455345

复制
相关文章

相似问题

领券
问题归档专栏文章快讯文章归档关键词归档开发者手册归档开发者手册 Section 归档