Added lisp and smalltalk extensions

beyondgrep · Jan 28, 2008 · fb40e8a · fb40e8a
1 parent 1646a2a
commit fb40e8a
Show file tree

Hide file tree

Showing 4 changed files with 10 additions and 3 deletions.
diff --git a/Ack.pm b/Ack.pm
@@ -70,10 +70,10 @@ BEGIN {
         haskell     => [qw( hs lhs )],
         hh          => [qw( h )],
         html        => [qw( htm html shtml xhtml )],
-        lisp        => [qw( lisp )],
         java        => [qw( java properties )],
         js          => [qw( js )],
         jsp         => [qw( jsp jspx jhtm jhtml )],
+        lisp        => [qw( lisp lsp )],
         make        => q{Makefiles},
         mason       => [qw( mas mhtml mpl mtxt )],
         objc        => [qw( m h )],
@@ -88,6 +88,7 @@ BEGIN {
         scheme      => [qw( scm )],
         shell       => [qw( sh bash csh ksh zsh )],
         skipped     => q{Files, but not directories, normally skipped by ack (default: off)},
+        smalltalk   => [qw( st )],
         sql         => [qw( sql ctl )],
         tcl         => [qw( tcl )],
         tex         => [qw( tex cls sty )],

diff --git a/Changes b/Changes
@@ -1,5 +1,9 @@
 Changelog for ack
 
+NEXT
+    [ENHANCEMENTS]
+    Added .lsp for --lisp, .st for --smalltalk.
+
 1.77_01     Sun Jan 27 20:52:27 CST 2008
     [CHANGED FUNCTIONALITY]
     ack now always searches files given on the command line, even

diff --git a/ack-help-types.txt b/ack-help-types.txt
@@ -22,7 +22,7 @@ Note that some extensions may appear in multiple types.  For example,
     --[no]java      .java .properties
     --[no]js        .js
     --[no]jsp       .jsp .jspx .jhtm .jhtml
-    --[no]lisp      .lisp
+    --[no]lisp      .lisp .lsp
     --[no]make      Makefiles
     --[no]mason     .mas .mhtml .mpl .mtxt
     --[no]objc      .m .h
@@ -37,6 +37,7 @@ Note that some extensions may appear in multiple types.  For example,
     --[no]scheme    .scm
     --[no]shell     .sh .bash .csh .ksh .zsh
     --[no]skipped   Files, but not directories, normally skipped by ack (default: off)
+    --[no]smalltalk .st
     --[no]sql       .sql .ctl
     --[no]tcl       .tcl
     --[no]tex       .tex .cls .sty

diff --git a/ack-standalone b/ack-standalone
@@ -860,10 +860,10 @@ BEGIN {
         haskell     => [qw( hs lhs )],
         hh          => [qw( h )],
         html        => [qw( htm html shtml xhtml )],
-        lisp        => [qw( lisp )],
         java        => [qw( java properties )],
         js          => [qw( js )],
         jsp         => [qw( jsp jspx jhtm jhtml )],
+        lisp        => [qw( lisp lsp )],
         make        => q{Makefiles},
         mason       => [qw( mas mhtml mpl mtxt )],
         objc        => [qw( m h )],
@@ -878,6 +878,7 @@ BEGIN {
         scheme      => [qw( scm )],
         shell       => [qw( sh bash csh ksh zsh )],
         skipped     => q{Files, but not directories, normally skipped by ack (default: off)},
+        smalltalk   => [qw( st )],
         sql         => [qw( sql ctl )],
         tcl         => [qw( tcl )],
         tex         => [qw( tex cls sty )],