✏️ 正在编辑: String.pm
路径:
/usr/share/perl5/Debconf/Element/Kde/String.pm
提示:
您可以编辑任何文件（包括二进制文件），但请注意不当修改可能导致文件损坏。
#!/usr/bin/perl -w # This file was preprocessed, do not edit! package Debconf::Element::Kde::String; use strict; use QtCore4; use QtGui4; use base qw(Debconf::Element::Kde); use Debconf::Encoding qw(to_Unicode); sub create { my $this=shift; $this->SUPER::create(@_); $this->startsect; $this->widget(Qt::LineEdit($this->cur->top)); my $default=''; $default=$this->question->value if defined $this->question->value; $this->widget->setText(to_Unicode($default)); $this->adddescription; $this->addhelp; $this->addwidget ($this->widget); $this->endsect; } sub value { my $this=shift; return $this->widget->text(); } 1
💾 保存文件
← 返回文件管理器