From ff0b7e65aaf2c5e1401f29ef79d5dab2af9a2d7f Mon Sep 17 00:00:00 2001 From: Dobrica Pavlinusic Date: Sat, 12 Nov 2005 21:31:47 +0000 Subject: [PATCH] check for current_filename and die if need (needs more work) git-svn-id: svn+ssh://mjesec/home/dpavlin/svn/webpac2/trunk@39 07558da8-63fa-0310-ba24-9fe276d99e06 --- lib/WebPAC/Normalize.pm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lib/WebPAC/Normalize.pm b/lib/WebPAC/Normalize.pm index 36ed063..2fca3fb 100644 --- a/lib/WebPAC/Normalize.pm +++ b/lib/WebPAC/Normalize.pm @@ -257,6 +257,8 @@ sub data_structure { } + $log->logdie("there is no current_filename defined! Do you have filename tag in conf/normalize/?.xml") unless ($self->{'current_filename'}); + $self->{'db'}->save_ds( ds => \@ds, current_filename => $self->{'current_filename'}, -- 2.20.1