1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm
index 8c74624ad..9a7327eb7 100644
--- a/perl-install/my_gtk.pm
+++ b/perl-install/my_gtk.pm
@@ -20,7 +20,7 @@ use Gtk;
 use Gtk::Gdk::ImlibImage;
 use c;
 use log;
-use common qw(:common :functional :file);
+use common;
 
 my $forgetTime = 1000; #- in milli-seconds
 $border = 5;
@@ -136,7 +136,7 @@ sub destroy($) {
     flush();
 }
 sub DESTROY { goto &destroy }
-sub sync($) {
+sub sync {
     my ($o) = @_;
     show($o);
     flush();