From: Victor Wagner Date: Thu, 6 Aug 2009 09:11:48 +0000 (+0000) Subject: Create directory stuff for things which shouln't be erased on update X-Git-Url: https://wagner.pp.ru/gitweb/?a=commitdiff_plain;ds=inline;h=a03029aa962b8aaac184ee1d4051c0aa4a09e2e1;hp=e61708f111d2a463094182a7b7de852e47ce7d65;p=sites%2Fhome_page.git Create directory stuff for things which shouln't be erased on update from preprocessed data --- diff --git a/Makefile b/Makefile index c285b75..cc8b4df 100644 --- a/Makefile +++ b/Makefile @@ -4,8 +4,7 @@ HTMLS:=$(shell find . -name "*.html") all: files pages files: - rsync -rltC --exclude photo --exclude templates --exclude scripts --exclude Makefile --exclude "*.html" --exclude fileinfo . "$(DESTDIR)" - + rsync -rltC --exclude photo --exclude templates --exclude scripts --exclude Makefile --exclude "*.html" --exclude staff --exclude fileinfo . "$(DESTDIR)" pages: files perl scripts/make_html.pl --dest "$(DESTDIR)" --template templates/page.tpl $(HTMLS) envtest: diff --git a/scripts/make_html.pl b/scripts/make_html.pl index c0251f5..110b764 100644 --- a/scripts/make_html.pl +++ b/scripts/make_html.pl @@ -57,6 +57,8 @@ for my $text_file (@ARGV) { $tpl[0] =~ s#()#$title$1$after_title#is; $tpl[0] =~ s#(abs2rel('', $textdir); + print "top=$top\n"; + $top = "" if ($top eq '/'); $top .= "/" if length($top); my $result = join('', $tpl[0], $body, $tpl[1]); $result =~