From 0d24899b78307e33d72a693d33178343069187dd Mon Sep 17 00:00:00 2001 From: Florian Pritz Date: Sun, 2 Apr 2017 21:35:57 +0200 Subject: Move format_timestamp to Helper Signed-off-by: Florian Pritz --- lib/App/BorgRestore.pm | 11 ++--------- 1 file changed, 2 insertions(+), 9 deletions(-) (limited to 'lib/App/BorgRestore.pm') diff --git a/lib/App/BorgRestore.pm b/lib/App/BorgRestore.pm index c300a0b..218be49 100644 --- a/lib/App/BorgRestore.pm +++ b/lib/App/BorgRestore.pm @@ -179,11 +179,11 @@ sub select_archive_timespec { my $target_timestamp = time - $seconds; - $log->debugf("Searching for newest archive that contains a copy before %s", $self->format_timestamp($target_timestamp)); + $log->debugf("Searching for newest archive that contains a copy before %s", App::BorgRestore::Helper::format_timestamp($target_timestamp)); for my $archive (reverse @$archives) { if ($archive->{modification_time} < $target_timestamp) { - $log->debugf("Found archive with timestamp %s", $self->format_timestamp($archive->{modification_time})); + $log->debugf("Found archive with timestamp %s", App::BorgRestore::Helper::format_timestamp($archive->{modification_time})); return $archive; } } @@ -191,13 +191,6 @@ sub select_archive_timespec { die "Failed to find archive matching time specification\n"; } -sub format_timestamp { - my $self = shift; - my $timestamp = shift; - - return POSIX::strftime "%a. %F %H:%M:%S %z", localtime $timestamp; -} - sub _timespec_to_seconds { my $self = shift; my $timespec = shift; -- cgit v1.2.3-24-g4f1b