[kde-services-devel] r493 - trunk/hotstuff/scripts

josef at new.kstuff.org josef at new.kstuff.org
Sun Nov 23 16:30:47 CET 2008


Author: josef
Date: 2008-11-23 16:30:46 +0100 (Sun, 23 Nov 2008)
New Revision: 493

Modified:
   trunk/hotstuff/scripts/ghnsmetatemplate
Log:
- updated for current GHNS spec



Modified: trunk/hotstuff/scripts/ghnsmetatemplate
===================================================================
--- trunk/hotstuff/scripts/ghnsmetatemplate	2008-11-23 09:49:07 UTC (rev 492)
+++ trunk/hotstuff/scripts/ghnsmetatemplate	2008-11-23 15:30:46 UTC (rev 493)
@@ -1,7 +1,7 @@
 #!/usr/bin/env perl
 #
 # GHNS Meta Template - create template file for GHNS upload
-# Copyright (C) 2006 Josef Spillner <josef at kstuff.org>
+# Copyright (C) 2006 - 2008 Josef Spillner <josef at kstuff.org>
 # Published under 'GNU AGPLv3 or later' conditions
 
 use strict;
@@ -9,7 +9,7 @@
 
 if(!$ARGV[0]){
 	print "Synopsis: ghnsmetatemplate <datafile> [<previewfile>]\n";
-	exit;
+	exit 1;
 }
 
 sub input {
@@ -47,8 +47,7 @@
 my $licence_agreement = input("Licence acronym (e.g. GPL)", "");
 my $summary = input("Description of the content (e.g. It's a nice calendar)", undef);
 my $version = input("Version of the content (e.g. 0.1)", undef);
-my $release = "1"; # TODO: server-side generation?
-my $releasedate = "$isodate"; # TODO: server-side generation? or auto-fill-in
+my $releasedate = "$isodate"; # TODO: server-side generation?
 
 my $payload = $ARGV[0];
 my $preview = "";
@@ -63,10 +62,9 @@
 $m .= "    <name lang=\"$lang\">$name</name>\n";
 $m .= "    <author email=\"$author_email\">$author</author>\n";
 $m .= "    <licence agreement=\"$licence_agreement\">$licence</licence>\n";
-$m .= "    <summary lang=\"$lang\">$summary</summary>\n";
 $m .= "    <version>$version</version>\n";
-$m .= "    <release>$release</release>\n";
 $m .= "    <releasedate>$releasedate</releasedate>\n";
+$m .= "    <summary lang=\"$lang\">$summary</summary>\n";
 $m .= "    <preview lang=\"$lang\">$preview</preview>\n";
 $m .= "    <payload lang=\"$lang\">$payload</payload>\n";
 $m .= "  </stuff>\n";



More information about the kde-services-devel mailing list