]> mj.ucw.cz Git - pciids.git/commitdiff
Import: fix empty note
authorMichal Vaner <vorner@ucw.cz>
Fri, 29 Aug 2008 20:19:50 +0000 (22:19 +0200)
committerMichal Vaner <vorner@ucw.cz>
Fri, 29 Aug 2008 20:19:50 +0000 (22:19 +0200)
It was caused by missing chomp and the note was not empty, it contained
only newline

scripts/importil.pl

index 7e0fe4b02e156a1ad0372a6d3d798fe721f87333..4f21c855637e3bc543840f7cb75635d73c86269d 100755 (executable)
@@ -46,6 +46,7 @@ sub insertId( $ ) {
 
 sub getUser( $ ) {
        my( $email ) = @_;
+       $email = "" unless defined $email;
        $email =~ s/.*<([^<>]*)>.*/$1/;
        my( $mailCheck ) = emailCheck( $email, undef );
        if( defined $mailCheck ) {
@@ -88,6 +89,7 @@ sub setMain( $ ) {
 print "Importing\n";
 
 while( defined( $_ = <> ) ) {
+       chomp;
        if( my( $lid ) = /^### ([0-9a-f]+) ###$/ ) {
                %ids = ();
                @toMark = ();