← Back to branch summary

~ubuntu-branches/ubuntu/oneiric/kdebindings/oneiric

« back to all changes in this revision

Viewing changes to perl/kdeui/examples/introduction/tutorial5/tutorial5.pl

  • Committer: Bazaar Package Importer
  • Author(s): Philip Muskovac
  • Date: 2010-12-07 00:10:46 UTC
  • mfrom: (1.1.42 upstream)
  • Revision ID: james.westby@ubuntu.com-20101207001046-h9gf2h54ym29tgui
Tags: 4:4.5.85-0ubuntu1
* New upstream beta release
* Disable libqwt-ruby1.8 and qwt files in libqt4-ruby1.8.examples
* Add libqtdeclarative-ruby1.8, libsmokeqt3support4-3,
  libsmokeqtdeclarative4-3 and libsmokeqthelp4-3

Show diffs side-by-side

added added

removed removed

Lines of Context:
perl/kdeui/examples/introduction/tutorial5/tutorial5.pl
4
4
use warnings;
5
5
 
6
6
use KDEUi4;
7
 
use Qt4::GlobalSpace qw( ki18n );
 
7
use Qt::GlobalSpace qw( ki18n );
8
8
use MainWindow;
9
9
 
10
10
sub main
11
11
{
12
 
    my $aboutData = KDE::AboutData( Qt4::ByteArray('tutorial5'), Qt4::ByteArray('tutorial5'),
13
 
            ki18n('Tutorial 5'), Qt4::ByteArray('1.0'),
 
12
    my $aboutData = KDE::AboutData( Qt::ByteArray('tutorial5'), Qt::ByteArray('tutorial5'),
 
13
            ki18n('Tutorial 5'), Qt::ByteArray('1.0'),
14
14
            ki18n('A simple text area which can load and save.'),
15
15
            KDE::AboutData::License_GPL(),
16
16
            ki18n('Copyright (c) 2007 Developer') );
18
18
    KDE::CmdLineArgs::init( scalar @ARGV, \@ARGV, $aboutData );
19
19
 
20
20
    my $options = KDE::CmdLineOptions();
21
 
    $options->add(Qt4::ByteArray('+[file]' . ki18n('Document to open')));
 
21
    $options->add(Qt::ByteArray('+[file]' . ki18n('Document to open')));
22
22
    KDE::CmdLineArgs::addCmdLineOptions($options);
23
23
 
24
24
    my $app = KDE::Application();