Changeset 232


Ignore:
Timestamp:
Apr 20, 2006, 6:16:18 PM (14 years ago)
Author:
nick
Message:

It seems many people do have content without matching node entries. Don't die now, skip it instead

Location:
wiki-toolkit/trunk/lib/Wiki/Toolkit/Setup
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • wiki-toolkit/trunk/lib/Wiki/Toolkit/Setup/Database.pm

    r231 r232  
    5252        while ( my($name,$version,$text,$modified,$comment) = $sth->fetchrow_array) {
    5353                my $id = $ids{$name};
    54                 unless($id) { die("Couldn't find ID for name '$name'"); }
    55                 my %content;
    56                 $content{'node_id'} = $id;
    57                 $content{'version'} = $version;
    58                 $content{'text'} = $text;
    59                 $content{'modified'} = $modified;
    60                 $content{'comment'} = $comment;
    61                 $content{'moderated'} = 1;
    62                 $contents{$id."-".$version} = \%content;
    63         }
     54                if($id) {
     55                        my %content;
     56                        $content{'node_id'} = $id;
     57                        $content{'version'} = $version;
     58                        $content{'text'} = $text;
     59                        $content{'modified'} = $modified;
     60                        $content{'comment'} = $comment;
     61                        $content{'moderated'} = 1;
     62                        $contents{$id."-".$version} = \%content;
     63                } else {
     64                        warn("There was no node entry for content with name '$name', unable to migrate it!");
     65                }
     66        }
     67        print " read ".(scalar keys %contents)." contents...  ";
    6468
    6569        # Grab all the metadata, and upgrade to ID from node
     
    6973        while( my($node,$version,$metadata_type,$metadata_value) = $sth->fetchrow_array) {
    7074                my $id = $ids{$node};
    71                 unless($id) { die("Couldn't find ID for name/node '$node'"); }
    72                 my %metadata;
    73                 $metadata{'node_id'} = $id;
    74                 $metadata{'version'} = $version;
    75                 $metadata{'metadata_type'} = $metadata_type;
    76                 $metadata{'metadata_value'} = $metadata_value;
    77                 $metadatas{$id."-".($i++)} = \%metadata;
     75                if($id) {
     76                        my %metadata;
     77                        $metadata{'node_id'} = $id;
     78                        $metadata{'version'} = $version;
     79                        $metadata{'metadata_type'} = $metadata_type;
     80                        $metadata{'metadata_value'} = $metadata_value;
     81                        $metadatas{$id."-".($i++)} = \%metadata;
     82                } else {
     83                        warn("There was no node entry for metadata with name (node) '$node', unable to migrate it!");
     84                }
    7885        }
    7986
  • wiki-toolkit/trunk/lib/Wiki/Toolkit/Setup/MySQL.pm

    r230 r232  
    128128                print "Upgrading: $upgrade_schema\n";
    129129                @cur_data = eval("&Wiki::Toolkit::Setup::Database::fetch_upgrade_".$upgrade_schema."(\$dbh)");
     130                if($@) { warn $@; }
    130131
    131132                # Drop the current tables
Note: See TracChangeset for help on using the changeset viewer.