From 284f6c70799dd8bde026c1a8994bc373a35d9c4a Mon Sep 17 00:00:00 2001 From: ivan Date: Thu, 1 Mar 2007 17:49:21 +0000 Subject: [PATCH] prune_applications moved to FS::Misc::prune --- FS/bin/freeside-prune-applications | 2 +- FS/bin/freeside-upgrade | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/FS/bin/freeside-prune-applications b/FS/bin/freeside-prune-applications index b459da55e..d2b6efe0b 100755 --- a/FS/bin/freeside-prune-applications +++ b/FS/bin/freeside-prune-applications @@ -5,7 +5,7 @@ use vars qw($opt_d $opt_q $opt_v); # $opt_n instead of $opt_d? use vars qw($DEBUG $DRY_RUN); use Getopt::Std; use FS::UID qw(adminsuidsetup checkeuid); -use FS::Misc qw(prune_applications); +use FS::Misc::prune qw(prune_applications); die "Not running uid freeside!" unless checkeuid(); diff --git a/FS/bin/freeside-upgrade b/FS/bin/freeside-upgrade index db58c117c..b3ac2d151 100755 --- a/FS/bin/freeside-upgrade +++ b/FS/bin/freeside-upgrade @@ -8,7 +8,7 @@ use DBIx::DBSchema 0.31; use FS::UID qw(adminsuidsetup checkeuid datasrc ); #getsecrets); use FS::CurrentUser; use FS::Schema qw( dbdef dbdef_dist reload_dbdef ); -use FS::Misc qw(prune_applications); +use FS::Misc::prune qw(prune_applications); die "Not running uid freeside!" unless checkeuid(); -- 2.11.0