summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone
diff options
context:
space:
mode:
authorSebastien Dupont <sdupont@mandriva.com>2001-10-24 14:02:19 +0000
committerSebastien Dupont <sdupont@mandriva.com>2001-10-24 14:02:19 +0000
commit3d91d0d6d7b0d523ff1b2621ded59de3df607e13 (patch)
treed83f4276c157cfdcad76bf6f39014aa244d97937 /perl-install/standalone
parentdf986ee73cb5d5b6a91f938b4351698ea359f29f (diff)
downloaddrakx-3d91d0d6d7b0d523ff1b2621ded59de3df607e13.tar
drakx-3d91d0d6d7b0d523ff1b2621ded59de3df607e13.tar.gz
drakx-3d91d0d6d7b0d523ff1b2621ded59de3df607e13.tar.bz2
drakx-3d91d0d6d7b0d523ff1b2621ded59de3df607e13.tar.xz
drakx-3d91d0d6d7b0d523ff1b2621ded59de3df607e13.zip
gi update.
Diffstat (limited to 'perl-install/standalone')
-rwxr-xr-xperl-install/standalone/drakfont24
1 files changed, 24 insertions, 0 deletions
diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont
index e655a6318..d3f2add96 100755
--- a/perl-install/standalone/drakfont
+++ b/perl-install/standalone/drakfont
@@ -582,3 +582,27 @@ sub progress_timeout3 {
# xlsfonts | less pour verifier l'installation des polices.
+# sub file_s {
+# my $window1 = $::isEmbedded ? new Gtk::Plug ($::XID) : new Gtk::Window -toplevel;
+# $window1->signal_connect ( delete_event => sub { Gtk->exit(0); });
+# $window1->set_position(1);
+# $window1->set_title(_("Fonts Importation"));
+# $window1->set_policy(1, 1, 1);
+# $window1->set_border_width(5);
+
+
+# if (not defined $window1) {
+# $window1 = new Gtk::FileSelection "file selection dialog";
+# $window1->position(-mouse);
+# $window1->signal_connect("destroy", \&destroy_window, \$window1);
+# $window1->signal_connect("delete_event", \&destroy_window, \$window1);
+# $window1->ok_button->signal_connect("clicked", \&file_selection_ok, $window1);
+# $window1->cancel_button->signal_connect("clicked", sub { destroy $window1 });
+
+# }
+# if (!visible $window1) {
+# show $window1;
+# } else {
+# destroy $window1;
+# }
+# }