--- branches/ffzg/all2xml.pl	2004/03/14 20:08:29	289
+++ branches/ffzg/all2xml.pl	2004/04/04 22:11:13	303
@@ -17,6 +17,7 @@
 
 my $config_file = $0;
 $config_file =~ s/\.pl$/.conf/;
+$config_file = $ARGV[0] if (-f $ARGV[0]);
 die "FATAL: can't find configuration file '$config_file'" if (! -e $config_file);
 
 my $config;
@@ -245,7 +246,7 @@
 
 			# what will separate last line from this one?
 			if ($display_data && $x->{append}) {
-				$line_delimiter = ' ';
+				$line_delimiter = $delimiter;
 			} elsif ($display_data) {
 				$line_delimiter = '<br/>';
 			}
@@ -918,6 +919,10 @@
 
 all2xml.pl - read various file formats and dump XML for SWISH-E
 
+=head1 SYNOPSYS
+
+ $ all2xml.pl [test.conf]
+
 =head1 DESCRIPTION
 
 This command will read ISIS data file using OpenIsis perl module, MARC
@@ -926,6 +931,9 @@
 this script B<isn't general xml generator> from isis files (isis allready
 has something like that). Output of this script is tailor-made for SWISH-E.
 
+If no configuration file is specified, it will use default one called
+C<all2xml.conf>.
+
 =head1 BUGS
 
 Documentation is really lacking. However, in true Open Source spirit, source