summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mandriva.org>2009-11-26 23:12:56 +0000
committerPascal Terjan <pterjan@mandriva.org>2009-11-26 23:12:56 +0000
commit6af9d6c98d7ccec8143f53ac970763910ad828f3 (patch)
treebfd20aeb1645d0f12ba4ef91adf95b8715c52460 /perl-install
parentd85eab6256a154934c9e7ebe849dd4bc24952f6c (diff)
downloaddrakx-6af9d6c98d7ccec8143f53ac970763910ad828f3.tar
drakx-6af9d6c98d7ccec8143f53ac970763910ad828f3.tar.gz
drakx-6af9d6c98d7ccec8143f53ac970763910ad828f3.tar.bz2
drakx-6af9d6c98d7ccec8143f53ac970763910ad828f3.tar.xz
drakx-6af9d6c98d7ccec8143f53ac970763910ad828f3.zip
diskdrake: allow copying disk and partition infos (#55886)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/NEWS2
-rw-r--r--perl-install/diskdrake/hd_gtk.pm2
2 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/NEWS b/perl-install/NEWS
index b18054551..1107a313d 100644
--- a/perl-install/NEWS
+++ b/perl-install/NEWS
@@ -14,6 +14,8 @@
- detect better invalid dos partition table (fixes a crash in harddrake)
- mygtk2:
o allow labels to be set selectable
+- diskdrake:
+ o allow copying disk and partition infos (#55886)
Version 12.78 - 18 November 2009
diff --git a/perl-install/diskdrake/hd_gtk.pm b/perl-install/diskdrake/hd_gtk.pm
index 6848e2b5b..65f4f94cb 100644
--- a/perl-install/diskdrake/hd_gtk.pm
+++ b/perl-install/diskdrake/hd_gtk.pm
@@ -243,7 +243,7 @@ sub per_entry_info_box {
}
gtkpack($box, gtkadd(gtkcreate_frame(N("Details")),
gtknew('HBox', border_width => 5, children_loose => [
- gtkset_alignment(gtkset_justify(Gtk2::Label->new($info), 'left'), 0, 0) ])));
+ gtkset_alignment(gtkset_justify(gtknew('Label', selectable => 1, text => $info), 'left'), 0, 0) ])));
}
sub current_kind_changed {