summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mandriva.org>2009-10-17 15:05:47 +0000
committerPascal Terjan <pterjan@mandriva.org>2009-10-17 15:05:47 +0000
commitfc9d23b1360e8103366260ac5c0cb79693a4701d (patch)
tree454c41f8a05721e1294ed44cc6d78779763b9dd7 /perl-install
parentc90ce783fe94354acb286090b8d5ff387e0129a2 (diff)
downloaddrakx-fc9d23b1360e8103366260ac5c0cb79693a4701d.tar
drakx-fc9d23b1360e8103366260ac5c0cb79693a4701d.tar.gz
drakx-fc9d23b1360e8103366260ac5c0cb79693a4701d.tar.bz2
drakx-fc9d23b1360e8103366260ac5c0cb79693a4701d.tar.xz
drakx-fc9d23b1360e8103366260ac5c0cb79693a4701d.zip
partitioning wizard: use a different color for newly created partition
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS2
-rw-r--r--perl-install/fs/partitioning_wizard.pm8
-rw-r--r--perl-install/install/NEWS3
-rw-r--r--perl-install/share/diskdrake.rc8
4 files changed, 17 insertions, 4 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index 4382ce7c0..451cfe209 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -1,5 +1,7 @@
- service_harddrake: allow to force screen resolution using
RESOLUTION_WANTED=XxY in /etc/sysconfig/harddrake2/service.conf
+- partitioning wizard:
+ o use a different color for newly created partition
Version 12.66 - 15 October 2009
diff --git a/perl-install/fs/partitioning_wizard.pm b/perl-install/fs/partitioning_wizard.pm
index b1826f2be..43d648edf 100644
--- a/perl-install/fs/partitioning_wizard.pm
+++ b/perl-install/fs/partitioning_wizard.pm
@@ -317,7 +317,7 @@ sub create_display_box {
my $b2 = Gtk2::Label->new("");
$ev2->add($b2);
$b2->set_size_request($ratio * MB(600), 0);
- $ev2->set_name("PART_ext4");
+ $ev2->set_name("PART_new");
my $hpane = Gtk2::HPaned->new;
$hpane->add1($ev);
@@ -342,7 +342,7 @@ sub create_display_box {
$win_size_label->set_alignment(0,0.5);
$ev = Gtk2::EventBox->new;
$ev->add(Gtk2::Label->new(" " x 4));
- $ev->set_name("PART_ext4");
+ $ev->set_name("PART_new");
ugtk2::gtkpack__($desc, $ev);
my $mdv_size_label = Gtk2::Label->new;
ugtk2::gtkset_size_request($mdv_size_label, 150, 20);
@@ -373,7 +373,7 @@ sub create_display_box {
} else {
if ($fill_empty && isEmpty($entry)) {
$w->set_text("Mandriva");
- $ev->set_name("PART_ext4");
+ $ev->set_name("PART_new");
} else {
$ev->set_name("PART_" . (isEmpty($entry) ? 'empty' :
$entry->{fs_type} && member($entry->{fs_type}, @colorized_fs_types) ? $entry->{fs_type} :
@@ -437,7 +437,7 @@ sub display_choices {
my $b2 = Gtk2::Label->new("Mandriva");
$item->add($b2);
$b2->set_size_request(516,24);
- $item->set_name("PART_ext4");
+ $item->set_name("PART_new");
} elsif ($s eq 'diskdrake') {
} else {
log::l($s);
diff --git a/perl-install/install/NEWS b/perl-install/install/NEWS
index 078b4a4b1..bdcecbabc 100644
--- a/perl-install/install/NEWS
+++ b/perl-install/install/NEWS
@@ -1,3 +1,6 @@
+- partitioning wizard:
+ o use a different color for newly created partition
+
Version 12.66 - 15 October 2009
- mount windows partitions under /media instead of /mnt (#53392)
diff --git a/perl-install/share/diskdrake.rc b/perl-install/share/diskdrake.rc
index 29c830f88..9efd83d2e 100644
--- a/perl-install/share/diskdrake.rc
+++ b/perl-install/share/diskdrake.rc
@@ -44,6 +44,13 @@ style "gray" = "font"
bg[PRELIGHT] = { 0.57, 0.62, 0.57 }
fg[NORMAL] = { 0, 0, 0 }
}
+style "yellow" = "font"
+{
+ bg[NORMAL] = { 1.0, 1.0, 0 }
+ bg[ACTIVE] = { 1.0, 1.0, 0 }
+ bg[PRELIGHT] = { 1.0, 1.0, 0 }
+ fg[NORMAL] = { 0, 0, 0 }
+}
widget "*PART_ext3" style "red"
widget "*PART_ext4" style "red"
@@ -53,3 +60,4 @@ widget "*PART_vfat" style "blue"
widget "*PART_ntfs*" style "blue"
widget "*PART_empty" style "white"
widget "*PART_other" style "gray"
+widget "*PART_new" style "yellow"