X-Git-Url: http://mj.ucw.cz/gitweb/?a=blobdiff_plain;f=maint%2Frelease;h=5f34b38d6fa478938f233d9f76ae81b5a9858c5c;hb=b98f24d11ba97582b16d8a4d547205fe10e5ffcc;hp=d43cc7beccb63e35dd18b7a2fe5e1e7c3e8418a7;hpb=aa5df0954da097e8afc0fdf7346002cd0290a333;p=libucw.git

diff --git a/maint/release b/maint/release
index d43cc7be..5f34b38d 100755
--- a/maint/release
+++ b/maint/release
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 # A simple script for making releases of LibUCW
-# (c) 2012 Martin Mares <mj@ucw.cz>
+# (c) 2012--2014 Martin Mares <mj@ucw.cz>
 
 use strict;
 use warnings;
@@ -23,9 +23,12 @@ $r->Upload;
 if ($r->{"do_upload"}) {
 	my $tdir = $r->{"TESTDIR"};
 	if (defined $tdir) {
+		print "Generating documentation\n";
+		`cd $tdir && make install-libucw-docs INSTALL_DOC_DIR=../doc`;
+		die if $?;
 		print "Upload of documentation\n";
 		$r->Confirm;
-		system qw(rsync -avz --delete), "$tdir/obj/ucw/doc/", qw(jw:/var/www/libucw/doc/ --exclude=*.deflist --exclude=*.txt);
+		system qw(rsync -avz --delete maint/tmp/doc/ucw/ jw:/var/www/libucw/doc/);
 		die if $@;
 	} else {
 		print "WARNING: With --notest, no documentation is published!\n";