让 Emacs shell 命令发送桌面通知 | Linux 中国

Posted 2021-04-09 Linux中国

多亏了 Emacs 的 钩子 机制，你可以配置 Emacs 在某个外部命令完成后调用一个 elisp 函数。

-- Jürgen Hötzel

我总是使用  来与操作系统进行交互，因为它与 Emacs 无缝整合、支持处理 (远程) 文件，而且在 Windows 上也能工作得很好。

启动 shell 命令后 (比如耗时严重的构建任务) 我经常会由于切换缓冲区而忘了追踪任务的运行状态。

多亏了 Emacs 的  机制，你可以配置 Emacs 在某个外部命令完成后调用一个 elisp 函数。

我使用  所编写的超棒的  包来发送桌面通知：

  
    
    
  

   
     
     
   
 
    
 
     (require 'alert) 
    
   
     
     
   
 
    
 
      
    
   
     
     
   
 
    
 
     (defun eshell-command-alert (process status) 
    
   
     
     
   
 
    
 
      "Send `alert' with severity based on STATUS when PROCESS finished." 
    
   
     
     
   
 
    
 
      (let* ((cmd (process-command process)) 
    
   
     
     
   
 
    
 
      (buffer (process-buffer process)) 
    
   
     
     
   
 
    
 
      (msg (format "%s: %s" (mapconcat 'identity cmd " ") status))) 
    
   
     
     
   
 
    
 
      (if (string-prefix-p "finished" status) 
    
   
     
     
   
 
    
 
      (alert msg :buffer buffer :severity 'normal) 
    
   
     
     
   
 
    
 
      (alert msg :buffer buffer :severity 'urgent)))) 
    
   
     
     
   
 
    
 
      
    
   
     
     
   
 
    
 
     (add-hook 'eshell-kill-hook #'eshell-command-alert) 
    
  
    
    
  

 的规则可以用程序来设置。就我这个情况来看，我只需要当对应的缓冲区不可见时得到通知：

  
    
    
  

   
     
     
   
 
    
 
     (alert-add-rule :status '(buried) ;only send alert when buffer not visible 
    
   
     
     
   
 
    
 
      :mode 'eshell-mode 
    
   
     
     
   
 
    
 
      :style 'notifications) 
    
  
    
    
  

这甚至对于  也一样生效。下面这个截屏展示了失败的 make 命令产生的 Gnome 桌面通知。

---

via: 

本文由  原创编译， 荣誉推出