diff options
| author | Andy Moreton | 2017-10-16 01:23:32 -0700 |
|---|---|---|
| committer | Paul Eggert | 2017-10-16 01:24:27 -0700 |
| commit | 613db8d35c3d080fd059dfc8cf668520bf6950d2 (patch) | |
| tree | 6eb2c32560d80e805054de57c5dfe532bf7f03e7 | |
| parent | 3205b12a78b6c52b247d8e40a70ccf23693807c5 (diff) | |
| download | emacs-613db8d35c3d080fd059dfc8cf668520bf6950d2.tar.gz emacs-613db8d35c3d080fd059dfc8cf668520bf6950d2.zip | |
Don't reject PBM header whitespace unnecessarily
* lisp/image.el (image-type-header-regexps):
Allow two or more CRs or LFs in initial whitespace sequences. See:
http://netpbm.sourceforge.net/doc/pbm.html
| -rw-r--r-- | lisp/image.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/image.el b/lisp/image.el index 1d0776180b2..32df508bc8d 100644 --- a/lisp/image.el +++ b/lisp/image.el | |||
| @@ -34,8 +34,8 @@ | |||
| 34 | (defconst image-type-header-regexps | 34 | (defconst image-type-header-regexps |
| 35 | `(("\\`/[\t\n\r ]*\\*.*XPM.\\*/" . xpm) | 35 | `(("\\`/[\t\n\r ]*\\*.*XPM.\\*/" . xpm) |
| 36 | ("\\`P[1-6]\\(?:\ | 36 | ("\\`P[1-6]\\(?:\ |
| 37 | \\(?:\\(?:#[^\r\n]*[\r\n]\\)?[[:space:]]\\)+\ | 37 | \\(?:\\(?:#[^\r\n]*[\r\n]\\)*[[:space:]]\\)+\ |
| 38 | \\(?:\\(?:#[^\r\n]*[\r\n]\\)?[0-9]\\)+\ | 38 | \\(?:\\(?:#[^\r\n]*[\r\n]\\)*[0-9]\\)+\ |
| 39 | \\)\\{2\\}" . pbm) | 39 | \\)\\{2\\}" . pbm) |
| 40 | ("\\`GIF8[79]a" . gif) | 40 | ("\\`GIF8[79]a" . gif) |
| 41 | ("\\`\x89PNG\r\n\x1a\n" . png) | 41 | ("\\`\x89PNG\r\n\x1a\n" . png) |