From 7cec7738fd762f50f7b9b47f958d0843aeed13b9 Mon Sep 17 00:00:00 2001
From: Michal Vaner <vorner@ucw.cz>
Date: Sun, 31 Aug 2008 15:51:39 +0200
Subject: [PATCH] Fix export comments

---
 scripts/export.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/scripts/export.pl b/scripts/export.pl
index 84e2aab..f14021a 100755
--- a/scripts/export.pl
+++ b/scripts/export.pl
@@ -29,12 +29,12 @@ foreach( @{$db->query( 'list', [] )} ) {
 	my $tabs = $_;
 	$id =~ s/.*\///;
 	$id =~ s/([0-9a-f]{4})([0-9a-f]{4})/$1 $2/;
-	print "$tabs$prefix$id  $name\n";
 	if( defined( $description ) && ( $description ne '' ) ) {
 		chomp $description;
-		$description =~ s/\n/\n$tabs#/g;
-		print "$tabs# $description\n";
+		$description =~ s/\n/\n# /g;
+		print "# $description\n";
 	}
+	print "$tabs$prefix$id  $name\n";
 }
 
 $db->commit();
-- 
2.39.2