Deleted Added
full compact
lisp (186690) lisp (192348)
1#------------------------------------------------------------------------------
2# lisp: file(1) magic for lisp programs
3#
4# various lisp types, from Daniel Quinlan (quinlan@yggdrasil.com)
5
6# updated by Joerg Jenderek
7# GRR: This lot is too weak
8#0 string ;;
9# windows INF files often begin with semicolon and use CRLF as line end
10# lisp files are mainly created on unix system with LF as line end
1#------------------------------------------------------------------------------
2# lisp: file(1) magic for lisp programs
3#
4# various lisp types, from Daniel Quinlan (quinlan@yggdrasil.com)
5
6# updated by Joerg Jenderek
7# GRR: This lot is too weak
8#0 string ;;
9# windows INF files often begin with semicolon and use CRLF as line end
10# lisp files are mainly created on unix system with LF as line end
11#>2 search/2048 !\r Lisp/Scheme program text
12#>2 search/2048 \r Windows INF file
11#>2 search/4096 !\r Lisp/Scheme program text
12#>2 search/4096 \r Windows INF file
13
13
140 search/256 (if\ Lisp/Scheme program text
140 search/4096 (if\ Lisp/Scheme program text
15!:mime text/x-lisp
15!:mime text/x-lisp
160 search/256 (setq\ Lisp/Scheme program text
160 search/4096 (setq\ Lisp/Scheme program text
17!:mime text/x-lisp
17!:mime text/x-lisp
180 search/256 (defvar\ Lisp/Scheme program text
180 search/4096 (defvar\ Lisp/Scheme program text
19!:mime text/x-lisp
19!:mime text/x-lisp
200 search/256 (defparam\ Lisp/Scheme program text
200 search/4096 (defparam\ Lisp/Scheme program text
21!:mime text/x-lisp
21!:mime text/x-lisp
220 search/256 (defun\ Lisp/Scheme program text
220 search/4096 (defun\ Lisp/Scheme program text
23!:mime text/x-lisp
23!:mime text/x-lisp
240 search/256 (autoload\ Lisp/Scheme program text
240 search/4096 (autoload\ Lisp/Scheme program text
25!:mime text/x-lisp
25!:mime text/x-lisp
260 search/256 (custom-set-variables\ Lisp/Scheme program text
260 search/4096 (custom-set-variables\ Lisp/Scheme program text
27!:mime text/x-lisp
28
29# Emacs 18 - this is always correct, but not very magical.
300 string \012( Emacs v18 byte-compiled Lisp data
31!:mime application/x-elc
32# Emacs 19+ - ver. recognition added by Ian Springer
33# Also applies to XEmacs 19+ .elc files; could tell them apart with regexs
34# - Chris Chittleborough <cchittleborough@yahoo.com.au>

--- 18 unchanged lines hidden ---
27!:mime text/x-lisp
28
29# Emacs 18 - this is always correct, but not very magical.
300 string \012( Emacs v18 byte-compiled Lisp data
31!:mime application/x-elc
32# Emacs 19+ - ver. recognition added by Ian Springer
33# Also applies to XEmacs 19+ .elc files; could tell them apart with regexs
34# - Chris Chittleborough <cchittleborough@yahoo.com.au>

--- 18 unchanged lines hidden ---