preparing for 6.7.6 release

docs/upgrades/upgrade_6.7.5-6.7.6.pl

@@ -0,0 +1,41 @@
+use lib "../../lib";
+use strict;
+use Getopt::Long;
+use WebGUI::Session;
+use WebGUI::SQL;
+use WebGUI::Asset;
+use WebGUI::Setting;
+
+my $toVersion = "6.7.6";
+my $configFile;
+my $quiet;
+
+start();
+
+finish();
+
+
+#-------------------------------------------------
+sub somefunc {
+        print "\tDoing something.\n" unless ($quiet);
+	# do something
+}
+
+
+#-------------------------------------------------
+sub start {
+	$|=1; #disable output buffering
+	GetOptions(
+    		'configFile=s'=>\$configFile,
+        	'quiet'=>\$quiet
+	);
+	WebGUI::Session::open("../..",$configFile);
+	WebGUI::Session::refreshUserInfo(3);
+	WebGUI::SQL->write("insert into webguiVersion values (".quote($toVersion).",'upgrade',".time().")");
+}
+
+#-------------------------------------------------
+sub finish {
+	WebGUI::Session::close();
+}
+