summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 7fddb16)
raw | patch | inline | side by side (parent: 7fddb16)
author | rettenbe <rettenbe@594d385d-05f5-0310-b6e9-bd551577e9d8> | |
Fri, 14 Mar 2008 15:56:23 +0000 (15:56 +0000) | ||
committer | rettenbe <rettenbe@594d385d-05f5-0310-b6e9-bd551577e9d8> | |
Fri, 14 Mar 2008 15:56:23 +0000 (15:56 +0000) |
git-svn-id: https://oss.gonicus.de/repositories/gosa/trunk@9875 594d385d-05f5-0310-b6e9-bd551577e9d8
gosa-si/server/events/clMessages.pm | patch | blob | history |
index 69e8e0d7e8e2dc83bb00acce58513b76af28a0d2..e14b2da46fc9451a6dd8a94905c0afb709b2d5b3 100644 (file)
my $macaddress = @{$msg_hash->{'macaddress'}}[0];
# test whether content is an empty hash or a string which is required
- my $content = @{$msg_hash->{$header}}[0];
+# TODO eval ändern auf if(ref($content) eq "HASH") dann ... else, dann...
+# my $content = @{$msg_hash->{$header}}[0];
+# $content = "$content";
+# if(ref($content) eq "HASH") { $content = ""; }
+#
eval{ if( 0 == keys(%$content) ) { $content = ""; } };
if( $@ ) { $content = "$content"; }
# test whether content is an empty hash or a string which is required
my $content;
my $cont = @{$msg_hash->{$header}}[0];
+# TODO eval ändern auf if(ref($content) eq "HASH") dann ... else, dann...
eval{ if( 0 == keys(%$cont) ) { $content = ""; } };
if( $@ ) { $content = "$cont"; }
# test whether content is an empty hash or a string which is required
my $content = @{$msg_hash->{$header}}[0];
+# TODO eval ändern auf if(ref($content) eq "HASH") dann ... else, dann...
eval{ if( 0 == keys(%$content) ) { $content = ""; } };
if( $@ ) { $content = "$content"; }
# test whether content is an empty hash or a string which is required
my $content = @{$msg_hash->{$header}}[0];
+# TODO eval ändern auf if(ref($content) eq "HASH") dann ... else, dann...
eval{ if( 0 == keys(%$content) ) { $content = ""; } };
if( $@ ) { $content = "$content"; }
my $content = @{$msg_hash->{$header}}[0];
# test whether content is an empty hash or a string which is required
+# TODO eval ändern auf if(ref($content) eq "HASH") dann ... else, dann...
eval{ if( 0 == keys(%$content) ) { $content = ""; } };
if( $@ ) { $content = "$content"; }
# test whether content is an empty hash or a string which is required
my $content = @{$msg_hash->{$header}}[0];
+# TODO eval ändern auf if(ref($content) eq "HASH") dann ... else, dann...
eval{ if( 0 == keys(%$content) ) { $content = ""; } };
if( $@ ) { $content = "$content"; }
# test whether content is an empty hash or a string which is required
my $content = @{$msg_hash->{$header}}[0];
+# TODO eval ändern auf if(ref($content) eq "HASH") dann ... else, dann...
eval{ if( 0 == keys(%$content) ) { $content = ""; } };
if( $@ ) { $content = "$content"; }
+ # set fai_state to localboot
+ &main::change_fai_state('error', \@{$msg_hash->{'macaddress'}}, $session_id);
+
my $sql_statement = "UPDATE $main::job_queue_tn ".
"SET status='processing', result='$header "."$content' ".
"WHERE status='processing' AND macaddress LIKE '$macaddress'";
# test whether content is an empty hash or a string which is required
my $content = @{$msg_hash->{$header}}[0];
+
+# TODO eval ändern auf if(ref($content) eq "HASH") dann ... else, dann...
eval{ if( 0 == keys(%$content) ) { $content = ""; } };
if( $@ ) { $content = "$content"; }