| 1 |
#!/bin/sh |
#!/bin/sh |
| 2 |
find -name ChangeLog | xargs cvs diff | grep "^\+" | sed -e "s/^\+//; s/^\+\+ .\//++ whatpm\//" > .cvslog.tmp |
find -name ChangeLog | xargs cvs diff | grep "^\+" | sed -e "s/^\+//; s/^\+\+ .\//++ whatpm\//" > .cvslog.tmp |
| 3 |
cvs commit -F .cvslog.tmp $1 $2 $3 $4 $5 $6 $7 $8 $9 |
## TODO: Don't use -I here |
| 4 |
perl mkcommitfeed.pl --file-name whatpm-commit.en.atom.u8 \ |
perl \ |
| 5 |
|
-I/home/wakaba/work/manakai2/lib/ \ |
| 6 |
|
mkcommitfeed.pl --file-name whatpm-commit.en.atom.u8 \ |
| 7 |
--feed-url http://suika.fam.cx/www/markup/html/whatpm/whatpm-commit \ |
--feed-url http://suika.fam.cx/www/markup/html/whatpm/whatpm-commit \ |
| 8 |
|
--feed-title "Whatpm ChangeLog diffs" \ |
| 9 |
--feed-lang en \ |
--feed-lang en \ |
| 10 |
|
--feed-related-url "http://suika.fam.cx/www/markup/html/whatpm/readme" \ |
| 11 |
|
--feed-license-url "http://suika.fam.cx/www/markup/html/whatpm/readme#license" \ |
| 12 |
|
--feed-rights "This feed is free software; you can redistribute it and/or modify it under the same terms as Perl itself." \ |
| 13 |
< .cvslog.tmp |
< .cvslog.tmp |
| 14 |
|
cvs commit -F .cvslog.tmp $1 $2 $3 $4 $5 $6 $7 $8 $9 |
| 15 |
rm .cvslog.tmp |
rm .cvslog.tmp |
| 16 |
|
|
| 17 |
## $Date$ |
## $Date$ |
Parent Directory
| 
Revision Log
| 
Patch