diff options
| -rw-r--r-- | perl-install/unused/migrate-ugtk2-to-mygtk2.pl | 4 |
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) { |