summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/unused/migrate-ugtk2-to-mygtk2.pl4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/unused/migrate-ugtk2-to-mygtk2.pl b/perl-install/unused/migrate-ugtk2-to-mygtk2.pl
index 71e07faaf..ccd0faaee 100644
--- a/perl-install/unused/migrate-ugtk2-to-mygtk2.pl
+++ b/perl-install/unused/migrate-ugtk2-to-mygtk2.pl
@@ -174,6 +174,10 @@ sub dorepl_new {
if ($class_ eq 'TextView' || !$class) {
$s = "$pre, text => ";
}
+ } elsif ($f eq 'gtkset_text') {
+ if ($class_ eq 'Entry' || !$class) {
+ $s = "$pre, text => ";
+ }
}
if (!$s) {