tests/unit/utils/UtilsTests.php -text
tools/export-tracker.tcl -text
tools/make-mo.sh -text
+tools/simulate_cron.pl -text
tools/tab2po/.classpath -text
tools/tab2po/.project -text
tools/tab2po/.settings/org.eclipse.jdt.core.prefs -text
--- /dev/null
+#!/usr/bin/perl -w
+#
+# Simple script to run all crons (for tests)
+#
+# Author: aljeux <aljeux@free.fr>
+#
+
+use strict;
+
+my $file = shift;
+
+open(F, $file) || die "Unable to open file '$file': $!";
+while (<F>) {
+ next if /^\s*#/;
+ next if /^\s*$/;
+ if (/^([A-Z]+)="(.*)"/) {
+ $ENV{$1}=$2;
+ print "Loading $1=$2\n";
+ }
+ if (/\S+\s+\S+\s+\S+\s+\S+\s+\S+\s+root\s+(.*)/) {
+ print "Running $1 (as root)\n";
+ system($1);
+ }
+ if (/\S+\s+\S+\s+\S+\s+\S+\s+\S+\s+gforge\s+(.*)/) {
+ print "Running $1 (as gforge)\n";
+ system('su', 'gforge', '-c', $1);
+ }
+}
+close(F);