X-Git-Url: https://git.octo.it/?a=blobdiff_plain;f=git-repack.sh;h=1fafb6ecf6ffbac817865470ec923af203da8e7e;hb=975b31dc6e12fba8f7b067ddbe32230995e05400;hp=064c85cbb624ebaa7a9a5776328afe7063126395;hpb=215a7ad1ef790467a4cd3f0dcffbd6e5f04c38f7;p=git.git

diff --git a/git-repack.sh b/git-repack.sh
index 064c85cb..1fafb6ec 100755
--- a/git-repack.sh
+++ b/git-repack.sh
@@ -3,16 +3,18 @@
 # Copyright (c) 2005 Linus Torvalds
 #
 
-. git-sh-setup || die "Not a git archive"
+USAGE='[-a] [-d] [-l] [-n]'
+. git-sh-setup
 	
-no_update_info= all_into_one= remove_redundant=
+no_update_info= all_into_one= remove_redundant= local=
 while case "$#" in 0) break ;; esac
 do
 	case "$1" in
 	-n)	no_update_info=t ;;
 	-a)	all_into_one=t ;;
-	-d)	remove_redandant=t ;;
-	*)	break ;;
+	-d)	remove_redundant=t ;;
+	-l)	local=t ;;
+	*)	usage ;;
 	esac
 	shift
 done
@@ -31,13 +33,16 @@ case ",$all_into_one," in
 	rev_list=
 	rev_parse='--all'
 	pack_objects=
-	# This part is a stop-gap until we have proper pack redundancy
-	# checker.
+
+	# Redundancy check in all-into-one case is trivial.
 	existing=`cd "$PACKDIR" && \
 	    find . -type f \( -name '*.pack' -o -name '*.idx' \) -print`
 	;;
 esac
-name=$(git-rev-list --objects $rev_list $(git-rev-parse $rev_parse) |
+if [ "$local" ]; then
+	pack_objects="$pack_objects --local"
+fi
+name=$(git-rev-list --objects $rev_list $(git-rev-parse $rev_parse) 2>&1 |
 	git-pack-objects --non-empty $pack_objects .tmp-pack) ||
 	exit 1
 if [ -z "$name" ]; then
@@ -52,13 +57,22 @@ mv .tmp-pack-$name.pack "$PACKDIR/pack-$name.pack" &&
 mv .tmp-pack-$name.idx  "$PACKDIR/pack-$name.idx" ||
 exit
 
-if test "$remove_redandant" = t
+if test "$remove_redundant" = t
 then
-	# We know $existing are all redandant only when
+	# We know $existing are all redundant only when
 	# all-into-one is used.
 	if test "$all_into_one" != '' && test "$existing" != ''
 	then
-		( cd "$PACKDIR" && rm -f $existing )
+		sync
+		( cd "$PACKDIR" &&
+		  for e in $existing
+		  do
+			case "$e" in
+			./pack-$name.pack | ./pack-$name.idx) ;;
+			*)	rm -f $e ;;
+			esac
+		  done
+		)
 	fi
 fi