diff options
Diffstat (limited to 'solenv')
-rw-r--r-- | solenv/bin/modules/installer/logger.pm | 44 |
1 files changed, 0 insertions, 44 deletions
diff --git a/solenv/bin/modules/installer/logger.pm b/solenv/bin/modules/installer/logger.pm index 01303697beff..f86c4df82eff 100644 --- a/solenv/bin/modules/installer/logger.pm +++ b/solenv/bin/modules/installer/logger.pm @@ -247,19 +247,6 @@ sub get_time_string } ############################################################### -# Returning the age of a file (in seconds) -############################################################### - -sub get_file_age -{ - my ( $filename ) = @_; - - my $filetime = (stat($filename))[9]; - my $timediff = time() - $filetime; - return $timediff; -} - -############################################################### # Stopping the time ############################################################### @@ -270,29 +257,6 @@ sub stoptime } ############################################################### -# Set date string, format: yymmdd -############################################################### - -sub set_installation_date -{ - my $datestring = ""; - - my @timearray = localtime(time); - - my $day = $timearray[3]; - my $month = $timearray[4] + 1; - my $year = $timearray[5] - 100; - - if ( $year < 10 ) { $year = "0" . $year; } - if ( $month < 10 ) { $month = "0" . $month; } - if ( $day < 10 ) { $day = "0" . $day; } - - $datestring = $year . $month . $day; - - return $datestring; -} - -############################################################### # Console output: messages ############################################################### @@ -305,14 +269,6 @@ sub print_message return; } -sub print_message_without_newline -{ - my $message = shift; - chomp $message; - print "$message" if ( ! $installer::globals::quiet ); - return; -} - ############################################################### # Console output: warnings ############################################################### |