| 3 |
# $Id$ |
# $Id$ |
| 4 |
# |
# |
| 5 |
# $Log$ |
# $Log$ |
| 6 |
|
# Revision 1.49 2004/11/03 14:12:34 jonen |
| 7 |
|
# replaced print with logger->info |
| 8 |
|
# |
| 9 |
# Revision 1.48 2004/10/28 11:35:51 jonen |
# Revision 1.48 2004/10/28 11:35:51 jonen |
| 10 |
# + bugfix related to select-criterias(filter) |
# + bugfix related to select-criterias(filter) |
| 11 |
# |
# |
| 864 |
my $nodename = $query->{node}; |
my $nodename = $query->{node}; |
| 865 |
my $newnode = $self->createNode($nodename); |
my $newnode = $self->createNode($nodename); |
| 866 |
my $id = $self->{_COREHANDLE}->insert($newnode); |
my $id = $self->{_COREHANDLE}->insert($newnode); |
| 867 |
|
|
| 868 |
print "Saved new node $nodename with GUID $newnode->{guid}, OID '$id': " . Dumper($newnode) . "\n"; |
$logger->info( __PACKAGE__ . "->sendQuery: Saved new node $nodename with GUID $newnode->{guid}, OID '$id'."); |
| 869 |
|
|
| 870 |
return $newnode; |
return $newnode; |
| 871 |
|
|
Parent Directory
| 
Revision Log
| 
Patch
