| @@ -150,7 +150,7 @@ sub db_get_document_object { | |||
| while(my $hash = $q->fetchrow_hashref()) { | |||
| my $clean = { }; | |||
| foreach my $name ( keys %{$hash} ) { | |||
| if ( $name =~ /^pages\.(.*)/ ) { | |||
| if ( $name =~ /^p\.(.*)/ ) { | |||
| my $newname = $1; | |||
| $clean->{$newname} = $hash->{$name}; | |||
| } | |||