prva verzija za squeeze
[ocsinventory-agent-cn.git] / Hostname.pm
index e641d8d..c1b5f31 100644 (file)
@@ -19,14 +19,6 @@ sub run {
 
   # ico, Tue, 26 May 2009 17:58:27 +0200
   chomp ( my $hostname = `hostname --fqdn` );
-  #eval { require (Sys::Hostname) };
-  #if (!$@) {
-  #  $hostname = Sys::Hostname::hostname();
-  #} else {
-  #  chomp ( $hostname = `hostname` ); # TODO: This is not generic.
-  #}
-  #$hostname =~ s/\..*//; # keep just the hostname
-
 
   $inventory->setHardware ({NAME => $hostname});
 }