Mercurial > emacs
annotate admin/diff-tar-files @ 70258:5dfde453f39e
(defgroup grep): Doc fix.
(grep-auto-highlight): Remove.
(grep-template): New defcustom.
(grep-find-template): Rename from grep-tree-template.
(grep-files-aliases): Rename from grep-tree-files-aliases.
Remove "all" alias, add "l" alias.
(grep-tree-ignore-case, grep-tree-ignore-CVS-directories): Remove.
(grep-find-ignored-directories): New defcustom to replace
grep-tree-ignore-CVS-directories, to facilitate ignoring
subdirectories for multiple version control systems.
(grep-mode-map): Add Recursive grep item to GREP menu.
(grep-regexp-history, grep-files-history): New defvars.
(grep-probe): New helper function.
(grep-compute-defaults): Use it to simplify code.
Adapt to name changes.
Use `.' as base in grep-find-template rather than <D>.
(grep): Remove superfluous highlight-regexp arg. Fix doc.
Call grep-compute-defaults unconditionally.
(grep-expand-keywords): New defconst.
(grep-expand-template): Rename from grep-expand-command-macros.
Simplify via grep-expand-keywords. Look at case-fold-search instead
of grep-tree-ignore-case to add -i option.
Bind case-fold-search to nil while matching keywords.
(grep-tree-last-regexp, grep-tree-last-files): Remove.
(grep-read-regexp, grep-read-files): New helper functions.
(rgrep): Rename from grep-tree. Rework to use proper histories.
Adapt to changes in defcustoms and functions above.
(lgrep): New command, as grep, but using same interactive api as rgrep.
| author | Kim F. Storm <storm@cua.dk> |
|---|---|
| date | Fri, 28 Apr 2006 22:22:01 +0000 |
| parents | a8b22f12b3dc |
| children | ddcbd2c1b70d 72dea2ff0142 |
| rev | line source |
|---|---|
| 39058 | 1 #! /bin/sh |
| 2 | |
|
70120
a8b22f12b3dc
updated copyright year(s)
Ramprasad B <ramprasad_i82@yahoo.com>
parents:
64079
diff
changeset
|
3 # Copyright (C) 2001, 2006 Free Software Foundation, Inc. |
| 39058 | 4 # |
| 5 # This file is part of GNU Emacs. | |
| 6 # | |
| 7 # GNU Emacs is free software; you can redistribute it and/or modify | |
| 8 # it under the terms of the GNU General Public License as published by | |
| 9 # the Free Software Foundation; either version 2, or (at your option) | |
| 10 # any later version. | |
| 11 # | |
| 12 # GNU Emacs is distributed in the hope that it will be useful, | |
| 13 # but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 15 # GNU General Public License for more details. | |
| 16 # | |
| 17 # You should have received a copy of the GNU General Public License | |
| 18 # along with GNU Emacs; see the file COPYING. If not, write to the | |
| 64079 | 19 # Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, |
| 20 # Boston, MA 02110-1301, USA. | |
| 39058 | 21 |
| 22 if [ $# != 2 ]; then | |
| 23 cat <<EOF | |
| 24 Usage: $0 OLD-TAR NEW-TAR | |
| 25 | |
| 26 Print a diff of the files in OLD-TAR and NEW-TAR. Used for checking | |
| 27 the contents of Emacs tar files. | |
| 28 EOF | |
| 29 exit 1; | |
| 30 fi | |
| 31 | |
| 32 old_tar=$1 | |
| 33 new_tar=$2 | |
| 34 | |
| 35 old_tmp=/tmp/old.$$ | |
| 36 new_tmp=/tmp/new.$$ | |
| 37 trap "rm -f $old_tmp $new_tmp; exit 1" 1 2 15 | |
| 38 | |
| 39 tar tzf $old_tar | sed -e 's,^[^/]*,,' | sort > $old_tmp | |
| 40 tar tzf $new_tar | sed -e 's,^[^/]*,,' | sort > $new_tmp | |
| 41 diff -u $old_tmp $new_tmp | |
| 42 rm -f $new_tmp $old_tmp | |
| 43 | |
| 44 | |
| 52401 | 45 # arch-tag: ef2c96e2-ea67-4668-925c-d9a6f3d205cf |
