yudaike/openSUSE-release-tools
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

queue them for all and fix signature

Browse Source
This commit is contained in:
Stephan Kulow 2012-02-08 10:04:42 +01:00
parent bd5fcaff90
commit 485e5a9010
2 changed files with 3 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
generate-reminder.pl
View File

@ -307,13 +307,13 @@ in this thread: http://lists.opensuse.org/opensuse-packaging/2012-02/msg00011.ht
The following packages are sorted by devel project of openSUSE:Factory The following packages are sorted by devel project of openSUSE:Factory
END END
$prefix .= "(you can find an uptodate version under $url)\n\n"; $prefix .= "( you can find an uptodate version under $url )\n\n";
$report = $prefix . $report; $report = $prefix . $report;
my $fortune = ''; my $fortune = '';
open(FORTUNE, "fortune -s|"); open(FORTUNE, "fortune -s|");
while ( <FORTUNE> ) { $fortune .= " " . $_; } while ( <FORTUNE> ) { $fortune .= " " . $_; }
close(FORTUNE); close(FORTUNE);
$report .= "\n\n--\nYour fortune cookie:\n" . $fortune; $report .= "\n\n-- \nYour fortune cookie:\n" . $fortune;
use Email::Simple; use Email::Simple;
use XML::Simple; use XML::Simple;

4
queue-all.sh
View File

@ -10,8 +10,6 @@ tuser=`mktemp`
tail -f $mbox & tail -f $mbox &
for i in `cat $users`; do for i in `cat $users`; do
osc meta user $i > $tuser osc meta user $i > $tuser
if grep @novell.com $tuser || grep @suse.com $tuser; then perl generate-reminder.pl $i >> $mbox
perl generate-reminder.pl $i >> $mbox
fi
done done
echo "DONE $mbox" echo "DONE $mbox"