20 04 05 69 W - + 0 - 0 Emacs阅读PDF文档

首先要安装pdftotext

    (add-to-list 'auto-mode-alist '("\\.pdf\\'" . no-pdf))
    (defun no-pdf ()
      "Run pdftotext on the entire buffer."
      (interactive)
      (let ((modified (buffer-modified-p)))
        (erase-buffer)
        (shell-command
         (concat "pdftotext " (buffer-file-name) " -")
         (current-buffer)
         t)
        (set-buffer-modified-p modified)))

我来评论:


姓名:  
记住我的个人信息

邮箱:
URL:
评论:表情 / 样式

  ( 登录/注册 )

回复同志: 将回复发到我的邮箱.  

提示: 除<b>和<i>标签以外的HTML标签都将从评论中去掉, 邮件和地址链接可自动识别.