comparison lisp/image-mode.el @ 82836:4526cbe33367

Add autoloads to put associations in auto-mode-alist: associate "\\.x[bp]m\\'" with c-mode and image-mode-maybe, and "\\.svgz?\\'" with xml-mode and image-mode-maybe.
author Juri Linkov <juri@jurta.org>
date Sat, 25 Aug 2007 14:08:44 +0000
parents 641f5b9362be
children 827101d5eacc
comparison
equal deleted inserted replaced
82835:de6e597c221b 82836:4526cbe33367
39 ;;;###autoload (push '("\\.jpe?g\\'" . image-mode) auto-mode-alist) 39 ;;;###autoload (push '("\\.jpe?g\\'" . image-mode) auto-mode-alist)
40 ;;;###autoload (push '("\\.png\\'" . image-mode) auto-mode-alist) 40 ;;;###autoload (push '("\\.png\\'" . image-mode) auto-mode-alist)
41 ;;;###autoload (push '("\\.gif\\'" . image-mode) auto-mode-alist) 41 ;;;###autoload (push '("\\.gif\\'" . image-mode) auto-mode-alist)
42 ;;;###autoload (push '("\\.tiff?\\'" . image-mode) auto-mode-alist) 42 ;;;###autoload (push '("\\.tiff?\\'" . image-mode) auto-mode-alist)
43 ;;;###autoload (push '("\\.p[bpgn]m\\'" . image-mode) auto-mode-alist) 43 ;;;###autoload (push '("\\.p[bpgn]m\\'" . image-mode) auto-mode-alist)
44
45 ;;;###autoload (push '("\\.x[bp]m\\'" . c-mode) auto-mode-alist)
44 ;;;###autoload (push '("\\.x[bp]m\\'" . image-mode-maybe) auto-mode-alist) 46 ;;;###autoload (push '("\\.x[bp]m\\'" . image-mode-maybe) auto-mode-alist)
47
48 ;;;###autoload (push '("\\.svgz?\\'" . xml-mode) auto-mode-alist)
49 ;;;###autoload (push '("\\.svgz?\\'" . image-mode-maybe) auto-mode-alist)
45 50
46 ;;; Image scrolling functions 51 ;;; Image scrolling functions
47 52
48 (defun image-forward-hscroll (&optional n) 53 (defun image-forward-hscroll (&optional n)
49 "Scroll image in current window to the left by N character widths. 54 "Scroll image in current window to the left by N character widths.