r77768 - /scripts/rename-uploader

gregoa at users.alioth.debian.org gregoa at users.alioth.debian.org
Sat Jul 23 16:07:15 UTC 2011


Author: gregoa
Date: Sat Jul 23 16:07:13 2011
New Revision: 77768

URL: http://svn.debian.org/wsvn/?sc=1&rev=77768
Log:
add git support (untested. I told you!)

Modified:
    scripts/rename-uploader

Modified: scripts/rename-uploader
URL: http://svn.debian.org/wsvn/scripts/rename-uploader?rev=77768&op=diff
==============================================================================
--- scripts/rename-uploader (original)
+++ scripts/rename-uploader Sat Jul 23 16:07:13 2011
@@ -5,8 +5,8 @@
    exit 1
 fi
 
-if [ -n "$(svn di)" ]; then
-    echo "Dirty working copy, exiting"
+if [ -d .svn -a -n "$(svn diff)" ]; then
+    echo "Dirty svn working copy, exiting"
     exit 1
 fi
 
@@ -20,12 +20,16 @@
 
 for i in `list_dirs`; do
     cd $i
+    if [ -d .git ] && git diff --quiet ; then
+	    echo "Dirty git repo, exiting"
+	    continue
+    fi
     for i in debian/control debian/copyright; do
         sub "$2" "$3" $i
         sub "$2" "$3" $i
     done
-    if [ -n "$(svn di)" ]; then
-        dch --release-heuristic=changelog --no-auto-nmu "Update $1's email address"
+    if [ -d .svn -a -n "$(svn diff)" ] || { [ -d .git ] && ! git diff --quiet }; then
+        dch --release-heuristic=changelog --no-auto-nmu "Email change: $1 -> $3"
     fi
     cd ..
 done




More information about the Pkg-perl-cvs-commits mailing list