# HG changeset patch # User Meredith Howard # Date 1488919279 18000 # Node ID 99f120bc1ad9d61ad25acff23e33da15528e82b6 # Parent ed01b5ca7b58482c66f8c9dfdc4da44b8a13395d oops, overloaded -y diff --git a/bin/archive-dir b/bin/archive-dir --- a/bin/archive-dir +++ b/bin/archive-dir @@ -20,7 +20,7 @@ sub main { ], ['age|a=i' => "minimum age in days for archival", {default => 60}], ['files|f' => "operate on plain files only"], - ['yes|y' => "actually move stuff"], + ['yes|Y' => "actually move stuff"], ['help|h' => "print usage message and exit", {shortcircuit => 1}], ); print($usage->text), exit if $opt->help || !@ARGV;