From cc0f51965dbaf8ac11d9eee32617f27b4d558353 Mon Sep 17 00:00:00 2001
From: in2 <in2@63ad8ddf-47c3-0310-b6dd-a9e9d9715204>
Date: Fri, 30 May 2003 10:31:37 +0000
Subject: for attribute

git-svn-id: http://opensvn.csie.org/pttbbs/pttbbs/trunk/pttbbs@913 63ad8ddf-47c3-0310-b6dd-a9e9d9715204
---
 blog/builddb.pl | 7 ++-----
 1 file changed, 2 insertions(+), 5 deletions(-)

(limited to 'blog')

diff --git a/blog/builddb.pl b/blog/builddb.pl
index 36e09a68..74bd5d99 100755
--- a/blog/builddb.pl
+++ b/blog/builddb.pl
@@ -81,14 +81,11 @@ sub buildconfigure($$)
 	    $c = $rch->{"$_.content"};
 	    open FH, ">$outdir/$fn";
 	    
-	    if( $c =~ m|<attribute>(.*?)</attribute>(.*)|s ){
+	    if( $c =~ m|<attribute>(.*?)\n\s*</attribute>\s*\n(.*)|s ){
 		($a, $c) = ($1, $2);
 		$a =~ s/^\s*\#.*?\n//gm;
 		foreach( split("\n", $a) ){
-		    if( /^\s*(\w+):\s+(.*)/ ){
-			$attr{"$fn.$1"} = $2;
-			print "\t$1: $2\n";
-		    }
+		    $attr{"$fn.$1"} = $2 if( /^\s*(\w+):\s+(.*)/ );
 		}
 	    }
 	    print FH $c;
-- 
cgit v1.2.3