X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;f=maint%2Frelease;h=52ec9740e98718f042002ab6a0bef82a1751b9ce;hb=a6c1ba6a211493ea0be849060f01659ff2213ae2;hp=c625c843d2b23e3b0dd1e7c3dfb1ffe7293b02ee;hpb=e79ce53d43d22b70072086c0e6c6cbbc6e08e2e3;p=checkmail.git

diff --git a/maint/release b/maint/release
index c625c84..52ec974 100755
--- a/maint/release
+++ b/maint/release
@@ -1,18 +1,21 @@
 #!/usr/bin/perl
 # A simple script for making releases of checkmail
-# (c) 2005 Martin Mares <mj@ucw.cz>
+# (c) 2005--2010 Martin Mares <mj@ucw.cz>
 
 use strict;
 use warnings;
-require "maint/release.pm";
+require "./maint/release.pm";
 
 my $r = new UCW::Release("checkmail");
+$r->{'do_patch'} = 0;
+$r->{'test_cmd'} = 'maint/check-compile';
 my $ver = $r->GetVersionFromFile("Makefile", "^VERSION=(.*)");
-$r->GetVersionsFromChangelog("ChangeLog", "Released as (.*)\.");
+# $r->GetVersionsFromChangelog("ChangeLog", "Released as (.*)\.");
 push @{$r->{"uploads"}}, {
 	"url" => "scp://atrey.karlin.mff.cuni.cz/~ftp/pub/local/mj/linux/"
 	};
+$r->AddUcwNotifier;
 $r->ParseOptions;
 $r->InitDist("maint/dist");
-my $reldir = $r->GenPackage;
+$r->GenPackage;
 $r->Dispatch;