mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-30 19:53:09 +00:00
Code Issues Releases Activity

(image-type-regexps): Use \' instead of `^' in

Browse Source 
most regular expressions.
This commit is contained in:
Gerd Moellmann 2001-08-07 08:03:42 +00:00
parent d1d850d6ab
commit 69ebef1d59
2 changed files with 12 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2001-08-07 Gerd Moellmann <gerd@gnu.org>
* image.el (image-type-regexps): Use `\`' instead of `^' in
most regular expressions.
2001-08-06 Pavel Jan,Bm(Bk <Pavel@Janik.cz>
* play/animate.el: re-insert a reference to re-inserted function.

14
lisp/image.el
View File

@ -31,14 +31,14 @@
(defconst image-type-regexps
'(("^/\\*.*XPM.\\*/" . xpm)
("^P[1-6]" . pbm)
("^GIF8" . gif)
'(("\\`/\\*.*XPM.\\*/" . xpm)
("\\`P[1-6]" . pbm)
("\\`GIF8" . gif)
("JFIF" . jpeg)
("^\211PNG\r\n" . png)
("^#define" . xbm)
("^\\(MM\0\\*\\)\\|\\(II\\*\0\\)" . tiff)
("^%!PS" . postscript))
("\\`\211PNG\r\n" . png)
("\\`#define" . xbm)
("\\`\\(MM\0\\*\\)\\|\\(II\\*\0\\)" . tiff)
("\\`%!PS" . postscript))
"Alist of (REGEXP . IMAGE-TYPE) pairs used to auto-detect image types.
When the first bytes of an image file match REGEXP, it is assumed to
be of image type IMAGE-TYPE.")