~ubuntu-branches/ubuntu/intrepid/pidgin/intrepid-proposed

« back to all changes in this revision

Viewing changes to intltool-extract.in

  • Committer: Bazaar Package Importer
  • Author(s): Sebastien Bacher
  • Date: 2008-09-16 22:13:07 UTC
  • mfrom: (1.1.13 upstream)
  • Revision ID: james.westby@ubuntu.com-20080916221307-dqwb808ehxlxgidq
Tags: 1:2.5.1-0ubuntu1
* New upstream version
* debian/patches/70_autoconf.patch:
  - new version update

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.37.1";
 
35
my $VERSION      = "0.36.2";
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",
165
 
                    "gettext/quotedxml"
 
164
                    "gettext/scheme", "gettext/xml", "gettext/quoted"
166
165
  -l, --local       Writes output into current working directory
167
166
                    (conflicts with --update)
168
167
      --update      Writes output into the same directory the source file 
219
218
    &type_schemas  if $gettext_type eq "schemas";
220
219
    &type_rfc822deb  if $gettext_type eq "rfc822deb";
221
220
    &type_quoted if $gettext_type eq "quoted";
222
 
    &type_quotedxml if $gettext_type eq "quotedxml";
223
221
}
224
222
 
225
223
sub entity_decode_minimal
733
731
    }
734
732
}
735
733
 
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
 
 
748
734
sub type_glade {
749
735
    ### For translatable Glade XML files ###
750
736