SPECS: builder - added list-sources-cvs command (warning: it will ...

[baggins]

Author: baggins                      Date: Fri May 11 12:02:13 2007 GMT
Module: SPECS                         Tag: HEAD
---- Log message:
- added list-sources-cvs command (warning: it will fetch the spec)

---- Files affected:
SPECS:
   builder (1.501 -> 1.502) 

---- Diffs:

================================================================
Index: SPECS/builder
diff -u SPECS/builder:1.501 SPECS/builder:1.502
--- SPECS/builder:1.501	Wed Apr 11 20:19:44 2007
+++ SPECS/builder	Fri May 11 14:02:08 2007
@@ -276,6 +276,7 @@
 -sd, --source-distfiles - list sources available from distfiles (intended for offline
                       operations; does not work when Icon field is present
                       but icon file is absent),
+-sc, --source-cvs - list sources available from CVS
 -sdp, --source-distfiles-paths - list sources available from distfiles -
                       paths relative to distfiles directory (intended for offline
                       operations; does not work when Icon field is present
@@ -1960,6 +1961,9 @@
 		-FRB | --force-remove-build-requires)
 			REMOVE_BUILD_REQUIRES="force"
 			shift ;;
+		-sc | --sources-cvs)
+			COMMAND="list-sources-cvs"
+			shift ;;
 		-sd | --sources-distfiles)
 			COMMAND="list-sources-distfiles"
 			shift ;;
@@ -2306,6 +2310,18 @@
 		for SAP in $SOURCES $PATCHES; do
 			if [ -n "$(src_md5 "$SAP")" ]; then
 				distfiles_url "$SAP"
+			fi
+		done
+		;;
+	"list-sources-cvs" )
+		init_builder
+#		NOCVSSPEC="yes"
+		DONT_PRINT_REVISION="yes"
+		get_spec
+		parse_spec
+		for SAP in $SOURCES $PATCHES; do
+			if [ -z "$(src_md5 "$SAP")" ]; then
+				echo $SAP | awk '{gsub(/.*\//,"") ; print}'
 			fi
 		done
 		;;
================================================================

---- CVS-web:
    http://cvs.pld-linux.org/SPECS/builder?r1=1.501&r2=1.502&f=u