git.c: two fixes, gitsetenv type and off-by-one error.
[gitweb.git] / git-tag.sh
index bd9275367405fa0b8c10a2e1394195cdbcfc632c..2435a75f7a9414bdceb1cef308a99918784f5421 100755 (executable)
@@ -1,10 +1,15 @@
 #!/bin/sh
 # Copyright (c) 2005 Linus Torvalds
 
-. git-sh-setup || die "Not a git archive"
+GIT_DIR=`git-rev-parse --git-dir` || exit $?
 
 usage () {
-    echo >&2 "Usage: git-tag [-a | -s | -u <key-id>] [-f] [-m <msg>] <tagname> [<head>]"
+    echo >&2 "Usage: git-tag [-a | -s | -u <key-id>] [-f | -d] [-m <msg>] <tagname> [<head>]"
+    exit 1
+}
+
+die () {
+    echo >&2 "$*"
     exit 1
 }
 
@@ -37,6 +42,13 @@ do
        shift
        username="$1"
        ;;
+    -d)
+       shift
+       tag_name="$1"
+       rm "$GIT_DIR/refs/tags/$tag_name" && \
+               echo "Deleted tag $tag_name."
+       exit $?
+       ;;
     -*)
         usage
        ;;
@@ -92,5 +104,6 @@ if [ "$annotate" ]; then
     object=$(git-mktag < "$GIT_DIR"/TAG_TMP)
 fi
 
-mkdir -p "$GIT_DIR/refs/tags"
+leading=`expr "refs/tags/$name" : '\(.*\)/'` &&
+mkdir -p "$GIT_DIR/$leading" &&
 echo $object > "$GIT_DIR/refs/tags/$name"