use proper mechanism for deleting statistics modules

Graham Knop · Graham Knop · commit 2bd090cd2b11 · 2012-01-03T15:46:46.000-05:00
diff --git a/share/upgrades/7.10.23-8.0.0/removeWebGUIStatistics.pl b/share/upgrades/7.10.23-8.0.0/removeWebGUIStatistics.pl
@@ -18,8 +18,7 @@
 $task && $task->delete;
 
 report "Deleting files";
-my $webgui_root = realpath( File::Spec->catdir( WebGUI::Paths->configBase, (File::Spec->updir) x 1 ) );
-unlink File::Spec->catfile($webgui_root, 'lib', 'WebGUI', 'Operation', 'Statistics.pm');
-unlink File::Spec->catfile($webgui_root, 'lib', 'WebGUI', 'Workflow', 'Activity', 'SendWebguiStats.pm');
+rm_lib 'WebGUI::Operation::Statistics';
+rm_lib 'WebGUI::Workflow::Activity::SendWebguiStats';
 
 done;
