summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2000-04-06 17:27:16 +0000
committerPascal Rigaux <pixel@mandriva.com>2000-04-06 17:27:16 +0000
commit4b5f9a0375c4c3b72b19f501b8a8383fdd39f6ac (patch)
treed49c1655880e29385024d7941bbb964b03c3e960
parent658f028abc50486955e99d7083cdff8e07088e6f (diff)
downloaddrakx-4b5f9a0375c4c3b72b19f501b8a8383fdd39f6ac.tar
drakx-4b5f9a0375c4c3b72b19f501b8a8383fdd39f6ac.tar.gz
drakx-4b5f9a0375c4c3b72b19f501b8a8383fdd39f6ac.tar.bz2
drakx-4b5f9a0375c4c3b72b19f501b8a8383fdd39f6ac.tar.xz
drakx-4b5f9a0375c4c3b72b19f501b8a8383fdd39f6ac.zip
no_comment
-rw-r--r--perl-install/install_steps_gtk.pm133
-rw-r--r--perl-install/my_gtk.pm2
-rw-r--r--perl-install/partition_table_raw.pm1
-rw-r--r--perl-install/share/install.rc4
-rw-r--r--perl-install/share/step-green.xpm193
-rw-r--r--perl-install/share/step-orange.xpm198
-rw-r--r--perl-install/share/step-red.xpm194
-rw-r--r--perl-install/share/themes-blue.rc6
-rw-r--r--perl-install/share/themes-mdk.rc125
-rw-r--r--perl-install/share/themes/mdk-bg.pngbin0 -> 95 bytes
-rw-r--r--perl-install/share/themes/mdk-check_off.pngbin0 -> 604 bytes
-rw-r--r--perl-install/share/themes/mdk-check_on.pngbin0 -> 611 bytes
-rw-r--r--perl-install/share/themes/mdk-toggle_off.pngbin0 -> 616 bytes
-rw-r--r--perl-install/share/themes/mdk-toggle_on.pngbin0 -> 701 bytes
14 files changed, 722 insertions, 134 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm
index 5af96574b..97cc61553 100644
--- a/perl-install/install_steps_gtk.pm
+++ b/perl-install/install_steps_gtk.pm
@@ -36,125 +36,8 @@ my $itemsNB = 1;
my (@background1, @background2);
my @themes_vga16 = qw(blue blackwhite savane);
-my @themes = qw(DarkMarble marble3d blueHeart);
-
-my @circle_head = (
- "19 17 4 1"
-);
-
-my @circle_body = (
-" c None",
-"+ c #FFFFFF",
-" ===== ",
-" ========= ",
-" =+++======= ",
-" =++========== ",
-" ==+============ ",
-" +++============ ",
-" ================o",
-" ================o",
-" ================o",
-" ===============oo",
-" ===============oo",
-" =============oo ",
-" ============ooo ",
-" o=========ooo ",
-" oo=====oooo ",
-" ooooooooo ",
-" ooooo ",
-);
-
-#-my @questionmark_head = (
-#-"39 97 6 1",
-#-" c None",
-#-". c #000000",
-#-"+ c #FFFFFF",
-#-"o c #AAAAAA",
-#-);
-#-my @questionmark_body = (
-#-("OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO") x 10,
-#-"OOOOOOOOOOOOO.......OOOOOOOOOOOOOOOOOOO",
-#-"OOOOOOOOOOOO..OOOOOOO.OOOOOOOOOOOOOOOOO",
-#-"OOOOOOOOOO..OOOOOOOOOOOOOOOOOOOOOOOOOOO",
-#-"OOOOOOOOOO..OOOOOOOOOOOOOOOOOOOOOOOOOOO",
-#-"OOOOOOOO..OOOOOOOOOOOOOOOOOOOOOOOOOOOOO",
-#-"OOOOOOOO..OOOOOOOOOOOOOOOOOOOOOOOOOOOOO",
-#-"OOOOOOO..OOOOOOOOOOOOOOOOOOXOOOOOOOOOOO",
-#-"OOOOOOO.OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO",
-#-"OOOOOO.OOOOOOOOOOOOOOOOOOOOOXOOOOOOOOOO",
-#-"OOOOO..OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO",
-#-"OOOOO.OOOOOOOOOOOOOOOOOOOOOOOXOOOOOOOOO",
-#-"OOOO..OOOOOOOOOOOOOOOOOOOOOOOOXOOOOOOOO",
-#-"OOOO.OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO",
-#-"OOOO.OOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOOOO",
-#-"OOO..OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO",
-#-"OOO.OOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOOO",
-#-"OO..OOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOOO",
-#-"OOO.OOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOOO",
-#-"OO.OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOO",
-#-"OO.OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOO",
-#-"O..OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOO",
-#-"OO.OOOOOOOOOOOoo+++++ooOOOOOOOOOOXOOOOO",
-#-"O.OOOOOOOOOOo+++o+++++++oOOOOOOOOOXOOOO",
-#-"O.OOOOOOOOO+++OOOOo+++++++OOOOOOOOXOOOO",
-#-"O.OOOOOOOOo++oOOOOOo++++++oOOOOOOOXOOOO",
-#-"O.OOOOOOOo+++oOOOOOO+++++++OOOOOOOXOOOO",
-#-"..OOOOOOOo++++OOOOOOo++++++oOOOOOOXOOOO",
-#-"O.OOOOOOO+++++oOOOOOo+++++++OOOOOOXOOOO",
-#-".OOOOOOOO++++++OOOOOo+++++++OOOOOOOXOOO",
-#-".OOOOOOOO++++++OOOOOo+++++++OOOOOOXOOOO",
-#-".OOOOOOOOo++++oOOOOOo++++++oOOOOOOOXOOO",
-#-".OOOOOOOOOo++oOOOOOOo++++++oOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOOOOOOO+++++++OOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOOOOOOO++++++OOOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOOOOOOo+++++oOOOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOOOOOO+++++OOOOOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOOOOOo+++oOOOOOOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOOOOO+++oOOOOOOOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOOOOo++OOOOOOOOOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOOOO++OOOOOOOOOOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOOOO+oOOOOOOOOOOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOOOO+OOOOOOOOOOOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOOOO+OOOOOOOOOOOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOOOOoOOOOOOOOOOOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOO",
-#-"O.OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOO",
-#-"OOOOOOOOOOOOOOOOoooOOOOOOOOOOOOOOOOXOOO",
-#-".OOOOOOOOOOOOOO+++++OOOOOOOOOOOOOOXOOOO",
-#-"O.OOOOOOOOOOOO++++++oOOOOOOOOOOOOOXXOOO",
-#-"O.OOOOOOOOOOOo+++++++OOOOOOOOOOOOOXOOOO",
-#-"O.OOOOOOOOOOOo+++++++OOOOOOOOOOOOOXOOOO",
-#-"O.OOOOOOOOOOOo+++++++OOOOOOOOOOOOOXOOOO",
-#-"OOOOOOOOOOOOOO++++++oOOOOOOOOOOOOOXOOOO",
-#-"O.OOOOOOOOOOOOO+++++OOOOOOOOOOOOOXXOOOO",
-#-"OO.OOOOOOOOOOOOOoooOOOOOOOOOOOOOOOXOOOO",
-#-"OO.OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOO",
-#-"OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOO",
-#-"OO.OOOOOOOOOOOOOOOOOOOOOOOOOOOOOXXOOOOO",
-#-"OOO.OOOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOO",
-#-"OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOOO",
-#-"OOO.OOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOOO",
-#-"OOOO.OOOOOOOOOOOOOOOOOOOOOOOOOOXXOOOOOO",
-#-"OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOOOO",
-#-"OOOOO.OOOOOOOOOOOOOOOOOOOOOOOOOXOOOOOOO",
-#-"OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOXXOOOOOOO",
-#-"OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOOOOO",
-#-"OOOOOO.OOOOOOOOOOOOOOOOOOOOOOXXOOOOOOOO",
-#-"OOOOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOOOOOO",
-#-"OOOOOOOOOOOOOOOOOOOOOOOOOOOOXXOOOOOOOOO",
-#-"OOOOOOOOOOOOOOOOOOOOOOOOOOOXXOOOOOOOOOO",
-#-"OOOOOOOOOOOOOOOOOOOOOOOOOOOXOOOOOOOOOOO",
-#-"OOOOOOOOOOOOOOOOOOOOOOOOOXXXOOOOOOOOOOO",
-#-"OOOOOOOOOOOOOOOOOOOOOOOOOXOOOOOOOOOOOOO",
-#-"OOOOOOOOOOOOXOOOOOOOOOOXXXOOOOOOOOOOOOO",
-#-"OOOOOOOOOOOOOOXOOOOOOXXXOOOOOOOOOOOOOOO",
-#-"OOOOOOOOOOOOOOOXXXXXXXOOOOOOOOOOOOOOOOO",
-#-("OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO") x 10);
-
-my @red_circle = (@circle_head, "= c #FF0000", "o c #AA5500", @circle_body);
-my @orange_circle = (@circle_head, "= c #FFAA00", "o c #AA5500", @circle_body);
-my @green_circle = (@circle_head, "= c #00FF00", "o c #00AA00", @circle_body);
+my @themes = qw(mdk DarkMarble marble3d blueHeart);
+
#-######################################################################################
#- In/Out Steps Functions
@@ -781,21 +664,17 @@ sub create_steps_window {
});
$w->show;
+ my @steps_icons = map { [ gtkcreate_xpm($w->{window}, "$ENV{SHARE_PATH}/step-$_.xpm") ] } qw(green orange red);
+
gtkadd($w->{window},
gtkpack_(new Gtk::VBox(0,0),
(map {; 1, $_ } map {
my $step = $o->{steps}{$_};
- my $circle =
- $step->{done} && \@green_circle ||
- $step->{entered} && \@orange_circle ||
- \@red_circle;
- my @pixmap = Gtk::Gdk::Pixmap->create_from_xpm_d($w->{window}->window, undef, @$circle);
-
my $w = new Gtk::Label(translate($step->{text}));
$w->set_name("Steps" . ($step->{reachable} && "Reachable"));
- my $b = new Gtk::HBox(0,5);
- gtkpack_($b, 0, new Gtk::Pixmap(@pixmap), 0, $w);
+ gtkpack_(my $b = new Gtk::HBox(0,5), 0,
+ new Gtk::Pixmap(@{$steps_icons[$step->{done} ? 0 : $step->{entered} ? 1 : 2]}), 0, $w);
$reachableSteps{$_} = $b if $step->{reachable};
$b;
diff --git a/perl-install/my_gtk.pm b/perl-install/my_gtk.pm
index 491680271..be64d842b 100644
--- a/perl-install/my_gtk.pm
+++ b/perl-install/my_gtk.pm
@@ -519,7 +519,7 @@ sub _ask_from_list {
gtkadd($o->{window},
gtkpack($o->create_box_with_title(@$messages),
gtkpack_(new Gtk::VBox(0,7),
- 1, @$l > 15 ? gtkset_usize(createScrolledWindow($list), 200, min(400, $::windowheight - 60)) : $list,
+ 1, @$l > 15 ? gtkset_usize(createScrolledWindow($list), 200, min(350, $::windowheight - 60)) : $list,
@okcancel || !ref $title ? (0, create_okcancel($o, @okcancel)) : ())
));
$o->show; #- otherwise the moveto is not done
diff --git a/perl-install/partition_table_raw.pm b/perl-install/partition_table_raw.pm
index 50da8dfe5..603d65f4e 100644
--- a/perl-install/partition_table_raw.pm
+++ b/perl-install/partition_table_raw.pm
@@ -22,6 +22,7 @@ my @MBR_signatures = (
[ 'dos', 0xa0, "\x25\x03\x4E\x02\xCD\x13" ],
[ 'dos', 0xa0, "\x00\xB4\x08\xCD\x13\x72" ], #- nt2k's
[ 'dos', 0x60, "\xBB\x00\x7C\xB8\x01\x02\x57\xCD\x13\x5F\x73\x0C\x33\xC0\xCD\x13" ], #- nt's
+ [ 'dos', 0x70, "\x0C\x33\xC0\xCD\x13\x4F\x75\xED\xBE\xA3" ],
[ 'freebsd', 0xC0, "\x00\x30\xE4\xCD\x16\xCD\x19\xBB\x07\x00\xB4" ],
[ 'freebsd', 0x160, "\x6A\x10\x89\xE6\x48\x80\xCC\x40\xCD\x13" ],
[ 'dummy', 0xAC, "\x0E\xB3\x07\x56\xCD\x10\x5E\xEB" ], #- caldera?
diff --git a/perl-install/share/install.rc b/perl-install/share/install.rc
index 84c264a4b..0875a0ece 100644
--- a/perl-install/share/install.rc
+++ b/perl-install/share/install.rc
@@ -8,10 +8,8 @@ style "steps"
fontset = "-*-*-medium-r-normal-*-8-*-*-*-*-*-iso8859-15"
}
-style "logo"
+style "logo" = "background"
{
- bg[NORMAL] = { 1.0, 1.0, 1.0 }
-
# no background image
engine "pixmap" { image { function = FLAT_BOX } }
}
diff --git a/perl-install/share/step-green.xpm b/perl-install/share/step-green.xpm
new file mode 100644
index 000000000..6d96f2281
--- /dev/null
+++ b/perl-install/share/step-green.xpm
@@ -0,0 +1,193 @@
+/* XPM */
+static char *magick[] = {
+/* columns rows colors chars-per-pixel */
+"21 21 166 2",
+" c #295300",
+". c #2a5500",
+"X c #2e540d",
+"o c #2f540e",
+"O c #305413",
+"+ c #33551a",
+"@ c #36591c",
+"# c #3a582b",
+"$ c #326400",
+"% c #37660d",
+"& c #356b00",
+"* c #3e6d16",
+"= c #387100",
+"- c #3b7402",
+"; c #3d7b00",
+": c #3e7d00",
+"> c #3f6623",
+", c #407c07",
+"< c #417c0a",
+"1 c #417711",
+"2 c #537b3f",
+"3 c #465b48",
+"4 c #4d5e5a",
+"5 c #4e5e5c",
+"6 c #505f63",
+"7 c #4f7244",
+"8 c #53744a",
+"9 c #587f4a",
+"0 c #5a7c54",
+"q c #546465",
+"w c #586b68",
+"e c #5b637f",
+"r c #5a6871",
+"t c #5f697f",
+"y c #5b7661",
+"u c #627a6e",
+"i c #5f6981",
+"p c #61658e",
+"a c #62658f",
+"s c #636e83",
+"d c #62688b",
+"f c #64698f",
+"g c #666c8f",
+"h c #646593",
+"j c #646791",
+"k c #646792",
+"l c #646594",
+"z c #656697",
+"x c #666797",
+"c c #666699",
+"v c #656992",
+"b c #676d92",
+"n c #676898",
+"m c #686998",
+"M c #696c98",
+"N c #6b7988",
+"B c #6e788e",
+"V c #6c7196",
+"C c #6f7695",
+"Z c #757b99",
+"A c #468c00",
+"S c #478e00",
+"D c #498612",
+"F c #489002",
+"G c #499200",
+"H c #4b9600",
+"J c #4c9405",
+"K c #4c910a",
+"L c #4d8223",
+"P c #59893e",
+"I c #579820",
+"U c #50a000",
+"Y c #50a100",
+"T c #51a200",
+"R c #52a400",
+"E c #53a700",
+"W c #54a800",
+"Q c #55a900",
+"! c #56ab00",
+"~ c #56ad00",
+"^ c #57ad01",
+"/ c #58a017",
+"( c #58b100",
+") c #59b200",
+"_ c #59b300",
+"` c #5ab500",
+"' c #5bb700",
+"] c #5dba00",
+"[ c #5dbb00",
+"{ c #5ebc00",
+"} c #5ebd00",
+"| c #64b51a",
+" . c #64a239",
+".. c #6ab729",
+"X. c #5e8850",
+"o. c #628360",
+"O. c #6a896d",
+"+. c #6a8572",
+"@. c #7baf5a",
+"#. c #60c000",
+"$. c #61c200",
+"%. c #62c400",
+"&. c #63c600",
+"*. c #64c800",
+"=. c #65c900",
+"-. c #65ca00",
+";. c #66cb00",
+":. c #66cc00",
+">. c #67cc01",
+",. c #68cd03",
+"<. c #68cd04",
+"1. c #6bce09",
+"2. c #6dce0c",
+"3. c #6ecf0d",
+"4. c #6fcf0f",
+"5. c #70cf10",
+"6. c #7bcc2f",
+"7. c #7ad322",
+"8. c #7cd324",
+"9. c #7ed428",
+"0. c #718189",
+"q. c #748090",
+"w. c #798495",
+"e. c #7d8a95",
+"r. c #8aaf7b",
+"t. c #96bf7b",
+"y. c #80d52b",
+"u. c #82d52e",
+"i. c #83d630",
+"p. c #83d631",
+"a. c #85d435",
+"s. c #85d634",
+"d. c #88d739",
+"f. c #89d83a",
+"g. c #8bd83d",
+"h. c #8ed942",
+"j. c #8fd946",
+"k. c #8fda45",
+"l. c #91da48",
+"z. c #94db4c",
+"x. c #9add57",
+"c. c #9bde58",
+"v. c #93c46f",
+"b. c #9acf6d",
+"n. c #a5d876",
+"m. c #a1e063",
+"M. c #a2e064",
+"N. c #a6e16a",
+"B. c #a7e26d",
+"V. c #a9e26f",
+"C. c #ace277",
+"Z. c #ade476",
+"A. c #b2e57f",
+"S. c #819987",
+"D. c #849e86",
+"F. c #849c89",
+"G. c #8ca68b",
+"H. c #8eaf82",
+"J. c #95b588",
+"K. c #9fbf8f",
+"L. c #a1c48c",
+"P. c #a3c88b",
+"I. c #a7cc8c",
+"U. c #aed590",
+"Y. c #b3dc8e",
+"T. c None",
+/* pixels */
+"T.T.T.T.T.T.T.T.T.T.T.T.r.+.T.T.T.T.T.T.T.",
+"T.T.T.T.T.T.T.T.T.T.T.w.c.o.T.T.T.T.T.T.T.",
+"T.T.T.T.T.T.T.T.T.T.M I.u.0 T.T.T.T.T.T.T.",
+"T.T.T.T.T.T.T.T.T.n K.Z.,.2 T.T.T.T.T.T.T.",
+"T.n T.T.T.T.T.T.T.e.A.z.} L T.T.T.T.T.T.T.",
+"T.t.L.J.F.q.V T.Z U.m.7.} K f T.T.T.T.T.T.",
+"T.O.a.x.M.N.n.P.Y.V.a.4.%.^ u T.T.T.T.T.T.",
+"T.T.X.] 4.y.f.l.k.y.4.>.>.=...N T.T.T.T.T.",
+"T.T.z P ^ $.>.1.1.,.>.=.,.4.7.k.v.H.S.0.b ",
+"T.T.T.v I ' %.=.>.>.>.>.>.<.5.8.d.h.p.=./ ",
+"T.T.T.T.g | <.>.>.>.>.>.>.=.%.] Q S & @ q ",
+"T.T.T.T.T.@.9.1.>.>.>.>.=.%.Q : . O 3 k T.",
+"T.T.T.T.m b.g.4.>.>.>.>.=._ ; X 6 p T.T.T.",
+"T.T.T.T.G.B.p.>.%.=.=.=.=.E % e T.T.T.T.T.",
+"T.T.T.C C.l.%.T H T ' %.=.E * z T.T.T.T.T.",
+"T.T.T.D.h.Q = + > S _ $.Q 1 k T.T.T.T.T.",
+"T.T.B 6.G X # 5 z T.7 J _ Q < k T.T.T.T.T.",
+"T.T. .D 4 p T.T.T.T.T.y T E , d T.T.T.T.T.",
+"T.T.s k T.T.T.T.T.T.T.T.9 F = t T.T.T.T.T.",
+"T.T.T.T.T.T.T.T.T.T.T.T.T.8 $ r T.T.T.T.T.",
+"T.T.T.T.T.T.T.T.T.T.T.T.T.T.w i T.T.T.T.T."
+};
diff --git a/perl-install/share/step-orange.xpm b/perl-install/share/step-orange.xpm
new file mode 100644
index 000000000..9a64f3a3d
--- /dev/null
+++ b/perl-install/share/step-orange.xpm
@@ -0,0 +1,198 @@
+/* XPM */
+static char *magick[] = {
+/* columns rows colors chars-per-pixel */
+"21 21 171 2",
+" c #664008",
+". c #66420f",
+"X c #6a4000",
+"o c #6f4300",
+"O c #6c440d",
+"+ c #664416",
+"@ c #6b4922",
+"# c #664d3b",
+"$ c #755129",
+"% c #7e5c3c",
+"& c #665043",
+"* c #665350",
+"= c #66565e",
+"- c #66575f",
+"; c #695450",
+": c #745d58",
+"> c #665862",
+", c #7d604e",
+"< c #7a6055",
+"1 c #6d627a",
+"2 c #74677d",
+"3 c #786671",
+"4 c #7e6b74",
+"5 c #666187",
+"6 c #666289",
+"7 c #66638c",
+"8 c #69658c",
+"9 c #6c668c",
+"0 c #666492",
+"q c #676697",
+"w c #666699",
+"e c #686797",
+"r c #6b6894",
+"t c #6d6b97",
+"y c #6e6b97",
+"u c #696898",
+"i c #6a6899",
+"p c #6b6998",
+"a c #706787",
+"s c #726886",
+"d c #746881",
+"f c #746983",
+"g c #787295",
+"h c #7c7392",
+"j c #7c7493",
+"k c #8d5500",
+"l c #8e590e",
+"z c #945a04",
+"x c #9f6000",
+"c c #9b6726",
+"v c #976b3f",
+"b c #a56300",
+"n c #a66400",
+"m c #a7670a",
+"M c #ad6800",
+"N c #a96d1a",
+"B c #b26b00",
+"V c #b56d00",
+"C c #b66d00",
+"Z c #b6710e",
+"A c #be7200",
+"S c #bf7814",
+"D c #806047",
+"F c #826657",
+"G c #947059",
+"H c #977d7a",
+"J c #c07300",
+"K c #c07301",
+"L c #c37500",
+"P c #c77800",
+"I c #c57808",
+"U c #ca7900",
+"Y c #cd7b00",
+"T c #cf7c00",
+"R c #c97b09",
+"E c #d47f00",
+"W c #88798b",
+"Q c #837994",
+"! c #b28050",
+"~ c #a1867d",
+"^ c #ad907f",
+"/ c #ba8e62",
+"( c #d88200",
+") c #d98200",
+"_ c #da8300",
+"` c #da8404",
+"' c #dd8500",
+"] c #d28414",
+"[ c #dd8d1d",
+"{ c #cd8420",
+"} c #c28338",
+"| c #e28800",
+" . c #e58900",
+".. c #e78b00",
+"X. c #e98c00",
+"o. c #eb8d00",
+"O. c #ec8e00",
+"+. c #ee8f00",
+"@. c #f09000",
+"#. c #f29100",
+"$. c #f39200",
+"%. c #f59300",
+"&. c #f79400",
+"*. c #f89500",
+"=. c #f99600",
+"-. c #fa9600",
+";. c #fc9700",
+":. c #fd9800",
+">. c #fe9900",
+",. c #ff9900",
+"<. c #ff9901",
+"1. c #ff9a03",
+"2. c #ff9b04",
+"3. c #ff9b06",
+"4. c #ff9e0c",
+"5. c #ff9e0d",
+"6. c #ff9f0f",
+"7. c #ffa012",
+"8. c #ffa113",
+"9. c #ffa216",
+"0. c #ffa41b",
+"q. c #ffa621",
+"w. c #ffa722",
+"e. c #ffa927",
+"r. c #ffa928",
+"t. c #ffaa2a",
+"y. c #f5a938",
+"u. c #ffac30",
+"i. c #ffad33",
+"p. c #ffae34",
+"a. c #ffb23f",
+"s. c #cb8e45",
+"d. c #d3984e",
+"f. c #d5a161",
+"g. c #d7af7e",
+"h. c #ffb545",
+"j. c #ffb648",
+"k. c #ffb74b",
+"l. c #ffb84e",
+"z. c #ffbb55",
+"x. c #ffbd5a",
+"c. c #e2ab62",
+"v. c #eebc77",
+"b. c #efbd77",
+"n. c #ffc061",
+"m. c #ffc163",
+"M. c #fdc167",
+"N. c #ffc267",
+"B. c #ffc46c",
+"V. c #f4c27b",
+"C. c #fdc672",
+"Z. c #ffc772",
+"A. c #ffc773",
+"S. c #ffc876",
+"D. c #ffc978",
+"F. c #ffcc7f",
+"G. c #94838e",
+"H. c #9b888d",
+"J. c #918496",
+"K. c #928494",
+"L. c #998993",
+"P. c #9b8d99",
+"I. c #a68f8a",
+"U. c #a7918d",
+"Y. c #b79a88",
+"T. c #bc9e86",
+"R. c #ceae8f",
+"E. c #d1ad86",
+"W. c #ddba90",
+"Q. c #e0ba8b",
+"!. c None",
+/* pixels */
+"!.!.!.!.!.!.!.!.!.!.!.!.h H !.!.!.!.!.!.!.",
+"!.!.!.!.!.!.!.!.!.!.!.!.E.s.!.!.!.!.!.!.!.",
+"!.!.!.!.!.!.!.!.!.!.!.K.C.{ q !.!.!.!.!.!.",
+"!.!.!.!.!.!.!.!.!.!.i Q.z.I 9 !.!.!.!.!.!.",
+"!.!.!.!.!.!.!.!.!.i R.D.t.K 3 !.!.!.!.!.!.",
+"!.H.Q t !.!.!.!.!.K.F.l.3.L F !.!.!.!.!.!.",
+"!.f.C.V.g.T.U.L.P.W.m.q.;.( v !.!.!.!.!.!.",
+"!.e [ q.j.x.N.C.S.m.i.4.>.$.] r !.!.!.!.!.",
+"!.!.4 S X.4.q.t.e.0.4.>.>.3.4.d.^ G.j i !.",
+"!.!.!.f R ..&.>.>.>.>.>.>.3.7.i.z.N.N.c./ ",
+"!.!.!.!.G ` $.>.>.>.>.>.>.>.>.4.9.7.&.E B ",
+"!.!.!.!.!.! 4.3.>.>.>.>.>.>.*...U x o + = ",
+"!.!.!.!.!.~ a.7.>.>.>.>.>.*.' b o . & 0 !.",
+"!.!.!.!.g v.l.7.>.>.>.>.>.$.C O = 7 !.!.!.",
+"!.!.!.!.Y.B.p.3.*.*.;.>.>.X.n ; !.!.!.!.!.",
+"!.!.!.t v.h.%.T A L ( +.*.X.M : !.!.!.!.!.",
+"!.!.!.I.j.( k X @ z P +.X.B < !.!.!.!.!.",
+"!.!.W y.K # > 5 !.1 c E | C , !.!.!.!.!.",
+"!.!.} m * 6 !.!.!.!.!.a Z Y C D !.!.!.!.!.",
+"!.!.s 8 !.!.!.!.!.!.!.!.f N n % !.!.!.!.!.",
+"!.!.!.!.!.!.!.!.!.!.!.!.!.2 l $ !.!.!.!.!."
+};
diff --git a/perl-install/share/step-red.xpm b/perl-install/share/step-red.xpm
new file mode 100644
index 000000000..745f37474
--- /dev/null
+++ b/perl-install/share/step-red.xpm
@@ -0,0 +1,194 @@
+/* XPM */
+static char *magick[] = {
+/* columns rows colors chars-per-pixel */
+"21 21 167 2",
+" c #661515",
+". c #66181a",
+"X c #6f1616",
+"o c #661c22",
+"O c #661f26",
+"+ c #67252f",
+"@ c #662e3e",
+"# c #662f40",
+"$ c #66364b",
+"% c #66374d",
+"& c #703142",
+"* c #783649",
+"= c #7b374a",
+"- c #7f425b",
+"; c #7f445f",
+": c #664360",
+"> c #6c4461",
+", c #664f73",
+"< c #664f74",
+"1 c #66547c",
+"2 c #764663",
+"3 c #7c4560",
+"4 c #7a5175",
+"5 c #665883",
+"6 c #6e5e8c",
+"7 c #6e608e",
+"8 c #666090",
+"9 c #666293",
+"0 c #676598",
+"q c #666699",
+"w c #6a6394",
+"e c #686597",
+"r c #6c6292",
+"t c #686698",
+"y c #6b6798",
+"u c #6b6799",
+"i c #6b6899",
+"p c #6f6999",
+"a c #70608e",
+"s c #746a99",
+"d c #766b98",
+"f c #7d6e9a",
+"g c #821a1a",
+"h c #911d1d",
+"j c #981e1e",
+"k c #822e3a",
+"l c #9b2020",
+"z c #9e2020",
+"x c #a32121",
+"c c #a62121",
+"v c #af2323",
+"b c #b12323",
+"n c #b22424",
+"m c #b52424",
+"M c #b72525",
+"N c #bc2525",
+"B c #be2626",
+"V c #bf343c",
+"C c #813c52",
+"Z c #8f3d52",
+"A c #a03542",
+"S c #a73d4f",
+"D c #b43540",
+"F c #9a4054",
+"G c #864763",
+"H c #8a5477",
+"J c #944f6f",
+"K c #ba4355",
+"L c #ab5773",
+"P c #a7627f",
+"I c #b6627b",
+"U c #c02626",
+"Y c #c52727",
+"T c #c12a2c",
+"R c #c82828",
+"E c #cb363f",
+"W c #d12a2a",
+"Q c #da2c2c",
+"! c #db2c2c",
+"~ c #dd2c2c",
+"^ c #e22d2d",
+"/ c #e42e2e",
+"( c #e52e2e",
+") c #e62e2e",
+"_ c #e92e2e",
+"` c #e92f2f",
+"' c #eb2f2f",
+"] c #ed2f2f",
+"[ c #e23031",
+"{ c #ee3030",
+"} c #ed3538",
+"| c #f23030",
+" . c #f33131",
+".. c #f53131",
+"X. c #f73131",
+"o. c #f83232",
+"O. c #f93232",
+"+. c #fc3232",
+"@. c #fd3333",
+"#. c #fe3333",
+"$. c #ff3333",
+"%. c #ff3434",
+"&. c #ff3535",
+"*. c #ff3636",
+"=. c #ff3838",
+"-. c #ff3939",
+";. c #ff3d3d",
+":. c #d14959",
+">. c #d36573",
+",. c #dd727e",
+"<. c #ff4040",
+"1. c #ff4141",
+"2. c #ff4242",
+"3. c #ff4545",
+"4. c #ff4949",
+"5. c #ff4c4c",
+"6. c #ff4d4d",
+"7. c #ff5151",
+"8. c #ff5252",
+"9. c #ff5a5a",
+"0. c #fd5d5e",
+"q. c #ff5c5c",
+"w. c #e8767e",
+"e. c #ff6161",
+"r. c #ff6363",
+"t. c #ff6969",
+"y. c #ff6a6a",
+"u. c #ff6d6d",
+"i. c #ff6f6f",
+"p. c #ff7474",
+"a. c #ff7575",
+"s. c #ff7777",
+"d. c #fb7a7c",
+"f. c #ff7979",
+"g. c #ff7e7e",
+"h. c #8c5e84",
+"j. c #806c96",
+"k. c #876f97",
+"l. c #836f98",
+"z. c #8b7096",
+"x. c #9f6383",
+"c. c #927599",
+"v. c #9f7b9b",
+"b. c #ad738f",
+"n. c #a77794",
+"m. c #a47d9b",
+"M. c #b5718a",
+"N. c #be798f",
+"B. c #a281a0",
+"V. c #c78194",
+"C. c #cb899a",
+"Z. c #cf94a4",
+"A. c #e38d97",
+"S. c #e98b92",
+"D. c #e9959c",
+"F. c #f58b8e",
+"G. c #ff8383",
+"H. c #ff8989",
+"J. c #fc8e8f",
+"K. c #ff8d8d",
+"L. c #f88f91",
+"P. c #fc9091",
+"I. c #ff9191",
+"U. c #ff9696",
+"Y. c #fd9e9f",
+"T. c #e597a0",
+"R. c None",
+/* pixels */
+"R.R.R.R.R.R.R.R.R.R.R.R.z.P R.R.R.R.R.R.R.",
+"R.R.R.R.R.R.R.R.R.R.R.p A.:.R.R.R.R.R.R.R.",
+"R.R.R.R.R.R.R.R.R.R.R.m.H.E e R.R.R.R.R.R.",
+"R.R.R.R.R.R.R.R.R.R.f D.i.T 6 R.R.R.R.R.R.",
+"R.R.R.R.R.R.R.R.R.i T.K.6.U 4 R.R.R.R.R.R.",
+"R.n.v.c.l.d u R.R.B.U.y.&.R G R.R.R.R.R.R.",
+"R.I g.I.I.L.S.C.Z.Y.a.4.+.^ S R.R.R.R.R.R.",
+"R.R.K &.8.e.y.a.f.y.6.=.&.+.} h.u R.R.R.R.",
+"R.R.r D ~ ..=.1.1.;.&.&.&.=.3.0.,.b.j.u R.",
+"R.R.R.a V ) ..+.+.+.+.+.&.&.;.6.e.a.d.w.>.",
+"R.R.R.R.H [ ..+.+.+.+.+.+.+.&.+.+. .Q N x ",
+"R.R.R.R.R.L 3.=.+.+.+.+.+.+. .Q b g $ < ",
+"R.R.R.R.R.M.y.1.+.+.+.+.+.O.W h . # , R.R.",
+"R.R.R.R.k.K.i.1.+.+.+.+.+.] b + 5 R.R.R.R.",
+"R.R.R.R.V.G.8...] ...+.+.' c > R.R.R.R.R.",
+"R.R.R.d F.0.Q v z c Y ) O.' v 2 R.R.R.R.R.",
+"R.R.R.N.9.N X o @ % k N ) ' M 3 R.R.R.R.R.",
+"R.R.x.O.l O : 8 R.R.q Z R ~ M - R.R.R.R.R.",
+"R.R.J ; 1 8 R.R.R.R.R.w F R n C R.R.R.R.R.",
+"R.R.R.R.R.R.R.R.R.R.R.R.R.A j = R.R.R.R.R.",
+"R.R.R.R.R.R.R.R.R.R.R.R.R.7 = & R.R.R.R.R."
+};
diff --git a/perl-install/share/themes-blue.rc b/perl-install/share/themes-blue.rc
index 3cc921861..d85932b45 100644
--- a/perl-install/share/themes-blue.rc
+++ b/perl-install/share/themes-blue.rc
@@ -42,14 +42,14 @@ style "button" = "any"
style "background"
{
- bg[NORMAL] = { 0, 0, 0.67 }
+ bg[NORMAL] = { 0, 0.67, 0.99 }
bg[PRELIGHT] = { 0, 0, 0.67 }
}
style "steps"
{
- bg[NORMAL] = { 0, 0, 0 }
- fg[NORMAL] = { 1.0, 1.0, 1.0 }
+ bg[NORMAL] = { 0, 0, 1.0 }
+ fg[NORMAL] = { 1.0, 1.0, 0 }
}
widget_class "*" style "any"
diff --git a/perl-install/share/themes-mdk.rc b/perl-install/share/themes-mdk.rc
new file mode 100644
index 000000000..c9e31fc62
--- /dev/null
+++ b/perl-install/share/themes-mdk.rc
@@ -0,0 +1,125 @@
+style "checkradiobutton" {
+ engine "pixmap" {
+ image
+ {
+ function = CHECK
+ recolorable = TRUE
+ shadow = OUT
+ overlay_file = "mdk-check_off.png"
+ overlay_stretch = FALSE
+ }
+ image
+ {
+ function = CHECK
+ recolorable = TRUE
+ shadow = IN
+ overlay_file = "mdk-check_on.png"
+ overlay_stretch = FALSE
+ }
+ image
+ {
+ function = OPTION
+ recolorable = TRUE
+ shadow = OUT
+ overlay_file = "mdk-toggle_off.png"
+ overlay_stretch = FALSE
+ }
+ image
+ {
+ function = OPTION
+ recolorable = TRUE
+ shadow = IN
+ overlay_file = "mdk-toggle_on.png"
+ overlay_stretch = FALSE
+ }
+ image
+ {
+ function = FOCUS
+ recolorable = TRUE
+ overlay_file = "focus.png"
+ overlay_border = { 4, 4, 4, 4 }
+ overlay_stretch = TRUE
+ }
+ }
+}
+
+style "window"
+{
+ engine "pixmap" {
+ image
+ {
+ function = FLAT_BOX
+ recolorable = TRUE
+ file = "mdk-bg.png"
+ stretch = FALSE
+ }
+ }
+}
+
+style "any"
+{
+ base[NORMAL] = { 0.2, 0.2, 0.4 }
+ bg[NORMAL] = { 0.2, 0.2, 0.4 }
+ bg[INSENSITIVE] = { 0.6, 0.6, 0.8 }
+ base[INSENSITIVE]={ 0.6, 0.6, 0.8 }
+ bg[ACTIVE] = { 0.6, 0.6, 0.8 }
+ bg[PRELIGHT] = { 0.4, 0.4, 0.6 }
+
+ text[NORMAL] = { 1.0, 1.0, 1.0 }
+ fg[NORMAL] = { 1.0, 1.0, 1.0 }
+ fg[INSENSITIVE] = { 1.0, 1.0, 1.0 }
+ text[INSENSITIVE]={ 1.0, 1.0, 1.0 }
+ fg[ACTIVE] = { 1.0, 1.0, 1.0 }
+ fg[PRELIGHT] = { 1.0, 1.0, 1.0 }
+
+ bg[SELECTED] = { 1.0, 1.0, 1.0 }
+ fg[SELECTED] = { 0.2, 0.2, 0.4 }
+}
+
+style "entry"
+{
+ base[NORMAL] = { 0.4, 0.4, 0.6 }
+ base[ACTIVE] = { 0.4, 0.4, 0.6 }
+ fg[NORMAL] = { 1.0, 1.0, 1.0 }
+}
+
+style "notebook"
+{
+ bg[NORMAL] = { 0, 0, 1.0 }
+ bg[ACTIVE] = { 0, 0, 0.67 }
+ fg[NORMAL] = { 1.0, 1.0, 1.0 }
+}
+
+style "button" = "any"
+{
+ bg[NORMAL] = { 0.4, 0.4, 0.6 }
+ fg[NORMAL] = { 1.0, 1.0, 1.0 }
+ bg[PRELIGHT] = { 0.36, 0.36, 0.56 }
+ fg[PRELIGHT] = { 0.8, 0.8, 1.0 }
+}
+
+style "background"
+{
+ bg[NORMAL] = { 0.6, 0.6, 0.8 }
+ bg[PRELIGHT] = { 0.8, 0.8, 0.99 }
+}
+
+style "steps"
+{
+ bg[NORMAL] = { 0.4, 0.4, 0.6 }
+ fg[NORMAL] = { 1.0, 1.0, 1.0 }
+}
+
+widget_class "GtkWindow" style "window"
+widget_class "*" style "any"
+widget_class "*GtkSpin*" style "entry"
+widget_class "*GtkEntry*" style "entry"
+widget_class "*Gtk*List*" style "entry"
+widget_class "*GtkCTree*" style "entry"
+widget_class "*GtkNotebook*" style "notebook"
+widget "*GtkButton*" style "button"
+widget "*background*" style "background"
+widget "*Steps*" style "steps"
+
+class "GtkRadioButton" style "checkradiobutton"
+class "GtkCheckButton" style "checkradiobutton"
diff --git a/perl-install/share/themes/mdk-bg.png b/perl-install/share/themes/mdk-bg.png
new file mode 100644
index 000000000..d749eb412
--- /dev/null
+++ b/perl-install/share/themes/mdk-bg.png
Binary files differ
diff --git a/perl-install/share/themes/mdk-check_off.png b/perl-install/share/themes/mdk-check_off.png
new file mode 100644
index 000000000..1e205d866
--- /dev/null
+++ b/perl-install/share/themes/mdk-check_off.png
Binary files differ
diff --git a/perl-install/share/themes/mdk-check_on.png b/perl-install/share/themes/mdk-check_on.png
new file mode 100644
index 000000000..e009f897a
--- /dev/null
+++ b/perl-install/share/themes/mdk-check_on.png
Binary files differ
diff --git a/perl-install/share/themes/mdk-toggle_off.png b/perl-install/share/themes/mdk-toggle_off.png
new file mode 100644
index 000000000..da48f81d1
--- /dev/null
+++ b/perl-install/share/themes/mdk-toggle_off.png
Binary files differ
diff --git a/perl-install/share/themes/mdk-toggle_on.png b/perl-install/share/themes/mdk-toggle_on.png
new file mode 100644
index 000000000..0b1844d04
--- /dev/null
+++ b/perl-install/share/themes/mdk-toggle_on.png
Binary files differ