diff options
| author | Florian Pritz <bluewind@xinu.at> | 2017-11-26 00:11:51 +0100 |
|---|---|---|
| committer | Florian Pritz <bluewind@xinu.at> | 2017-11-26 00:11:51 +0100 |
| commit | fd63fc156bcdf68e4a774409c92f55297415bb88 (patch) | |
| tree | defe20df04b83f67905b55060660768ba333e9bd /lib/App/BorgRestore | |
| parent | de186e51e282f28feb4d438a962e27cf41c34b31 (diff) | |
| download | App-BorgRestore-fd63fc156bcdf68e4a774409c92f55297415bb88.tar.gz App-BorgRestore-fd63fc156bcdf68e4a774409c92f55297415bb88.tar.xz | |
Remove old cache
Signed-off-by: Florian Pritz <bluewind@xinu.at>
Diffstat (limited to 'lib/App/BorgRestore')
| -rw-r--r-- | lib/App/BorgRestore/Settings.pm | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/App/BorgRestore/Settings.pm b/lib/App/BorgRestore/Settings.pm index d7cea4b..a581dab 100644 --- a/lib/App/BorgRestore/Settings.pm +++ b/lib/App/BorgRestore/Settings.pm @@ -123,6 +123,11 @@ for my $configfile (@configfiles) { } $cache_path_base = App::BorgRestore::Helper::untaint($cache_path_base, qr/.*/); +sub get_cache_base_dir_path { + my $path = shift; + return "$cache_path_base/$path"; +} + sub get_cache_dir { return "$cache_path_base/v3"; } |