[Slim-Checkins] r11019 - /trunk/tools/PluginBuilder/bin/create-slimserver-plugin

[dsully at svn.slimdevices.com]

Author: dsully
Date: Thu Dec 21 13:10:53 2006
New Revision: 11019

URL: http://svn.slimdevices.com?rev=11019&view=rev
Log:
Bug: N/A
Description: Generate a .par file only if requested.

Modified:
    trunk/tools/PluginBuilder/bin/create-slimserver-plugin

Modified: trunk/tools/PluginBuilder/bin/create-slimserver-plugin
URL: http://svn.slimdevices.com/trunk/tools/PluginBuilder/bin/create-slimserver-plugin?rev=11019&r1=11018&r2=11019&view=diff
==============================================================================
--- trunk/tools/PluginBuilder/bin/create-slimserver-plugin (original)
+++ trunk/tools/PluginBuilder/bin/create-slimserver-plugin Thu Dec 21 13:10:53 2006
@@ -18,11 +18,12 @@
 
 sub main {
 
-	my ($pluginDir, $slimserverDir);
+	my ($pluginDir, $slimserverDir, $parOnly);
 
 	GetOptions(
 		'plugindir=s'     => \$pluginDir,
 		'slimserverdir=s' => \$slimserverDir,
+		'paronly'         => \$parOnly,
 	);
 
 	if (!defined $slimserverDir || !-d $slimserverDir || !-f catdir($slimserverDir, 'strings.txt')) {
@@ -47,13 +48,20 @@
 
 	my $metaData = readPluginMetaData($pluginDir);
 
-	generatePARFile($pluginDir, $metaData, $excludeFile);
-
-	my $zipFile = generateZipFile($pluginDir, $metaData);
-
-	if (-f $zipFile) {
-
-		print "* Packaged plugin ok! File: [$zipFile] is ready for posting\n";
+	my $parFile  = generatePARFile($pluginDir, $metaData, $excludeFile);
+
+	if ($parOnly) {
+
+		print "* Packaged plugin ok - PAR Only! File: [$parFile] is ready for posting\n";
+
+	} else {
+
+		my $zipFile = generateZipFile($pluginDir, $metaData);
+
+		if (-f $zipFile) {
+
+			print "* Packaged plugin ok! File: [$zipFile] is ready for posting\n";
+		}
 	}
 }
 
@@ -181,7 +189,13 @@
 	if (-f $parFile) {
 
 		print "- PAR file: [$parFile] created ok!\n\n";
-	}
+
+	} else {
+
+		print "- PAR file: [$parFile] NOT CREATED!!\n\n";
+	}
+
+	return $parFile;
 }
 
 sub generateZipFile {