~ubuntu-branches/ubuntu/intrepid/lxpanel/intrepid

« back to all changes in this revision

Viewing changes to intltool-extract.in

  • Committer: Bazaar Package Importer
  • Author(s): Andrew Lee
  • Date: 2008-06-09 16:05:48 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20080609160548-31nz1xu6rz5cgaxr
Tags: 0.3.7-1
* New upstream release
  - Fixed the background of systray icons.
  - Fix incorrect position of the panels after screen resolution is
    changed via xrandr.
  - Saves config files more correctly when plugin configuration is
    modified.
* Bumped Standards-Version to 3.8.0.0
  - Supporting the standardized environment variable `DEB_BUILD_OPTIONS'
* Package split for lxpanel-netstat-plugin 

Show diffs side-by-side

added added

removed removed

Lines of Context:
32
32
## Release information
33
33
my $PROGRAM      = "intltool-extract";
34
34
my $PACKAGE      = "intltool";
35
 
my $VERSION      = "0.36.2";
 
35
my $VERSION      = "0.37.1";
36
36
 
37
37
## Loaded modules
38
38
use strict; 
161
161
      --type=TYPE   Specify the file type of FILENAME. Currently supports:
162
162
                    "gettext/glade", "gettext/ini", "gettext/keys"
163
163
                    "gettext/rfc822deb", "gettext/schemas",
164
 
                    "gettext/scheme", "gettext/xml", "gettext/quoted"
 
164
                    "gettext/scheme", "gettext/xml", "gettext/quoted",
 
165
                    "gettext/quotedxml"
165
166
  -l, --local       Writes output into current working directory
166
167
                    (conflicts with --update)
167
168
      --update      Writes output into the same directory the source file 
218
219
    &type_schemas  if $gettext_type eq "schemas";
219
220
    &type_rfc822deb  if $gettext_type eq "rfc822deb";
220
221
    &type_quoted if $gettext_type eq "quoted";
 
222
    &type_quotedxml if $gettext_type eq "quotedxml";
221
223
}
222
224
 
223
225
sub entity_decode_minimal
731
733
    }
732
734
}
733
735
 
 
736
sub type_quotedxml {
 
737
    while ($input =~ /\"(([^\"]|\\\")*[^\\\"])\"/g) {
 
738
        my $message = $1;
 
739
        my $before = $`;
 
740
        $message =~ s/\\\"/\"/g;
 
741
        $message = entity_decode($message);
 
742
        $before =~ s/[^\n]//g;
 
743
        $messages{$message} = [];
 
744
        $loc{$message} = length ($before) + 2;
 
745
    }
 
746
}
 
747
 
734
748
sub type_glade {
735
749
    ### For translatable Glade XML files ###
736
750