让emacs完美显示BMP文件的办法

关注

原创最新推荐文章于 2026-07-17 09:15:04 发布 4.6k 阅读 AI 写同款· GEO 优化 ›

Matlab读取BMP文件代码-matlabShell:Windows上用于Emacs的Matlab的CLI界面 Matlab读取BMP文件代码关于这些是适用于Windows XP +的matlabShell引擎matlabShell.exe 1.1版的使用说明。可以在命令窗口中独立使用matlabShell.exe，这样做可以清除许多安装难题，从而帮助确定外壳安装或matlab.el安装是否存在任何问题。点emacs 有关详细信息，请按照Matlab模式说明进行操作。您的emacs初始化应该包含以下内容： ; ; Load CEDET. ; ; See cedet/common/cedet.info for configuration details. ; ; IMPORTANT: For Emacs >= 23.2, you must place this *before* any ; ; CEDET component (including EIEIO) gets activated by another ; ; package (Gnus, auth-source, ...). (load-file " d:/dev/emacs/cedet/common/cedet.el " ) 立即下载

首先感谢http://emacser.com/的ahei，

这个想法是在和TA谈话时想到，

由于是边试边写，程序中用到了本人以前写的ppm-gen( http://www.emacswiki.org/emacs/ppm-gen.el )

基本思路是使用emacs lisp强大的advice功能，

在.emacs中加入以下代码：

(require 'ppm-gen) (defadvice image-type (around image-type-bmp first (source &optional type data-p) activate) (setq ad-return-value (cond (data-p (if (string-match "^BM" source) 'bmp ad-do-it)) (t (if (string-match ".*//.bmp" source) 'bmp ad-do-it))))) (defadvice create-image (around create-image-bmp (file-or-data &optional type data-p &rest props) activate) (setq ad-return-value (cond ((eq 'bmp type) (let (ppm-obj ppm-data) (setq ppm-obj (ppm-from-bmp file-or-data)) (setq ppm-data (with-temp-buffer (set-buffer-multibyte nil) (with-slots ((w width) (h height) pixels) ppm-obj (insert (format "P6 %d %d 255/r" w h)) (insert (concat pixels))) (buffer-substring-no-properties (point-min) (point-max)))) (create-image ppm-data 'pbm t))) (t ad-do-it)))) (add-to-list 'auto-mode-alist '("//.//(bmp//|BMP//)$" . image-mode))

然后你就把BMP文件往emacs里拖就可以拉。 C-cC-c也是可用，所谓完美就指这个。

善用这个例子，可以让emacs显示任何图片的喔。

收录于