diff options
| author | Bruno Haible <bruno@clisp.org> | 2006-03-16 13:10:48 +0000 |
|---|---|---|
| committer | Bruno Haible <bruno@clisp.org> | 2009-06-23 12:13:03 +0200 |
| commit | 5ea8c31fe01181f47961977fc513e7c8ba2785b6 (patch) | |
| tree | 56f48c3ce71ada4cc1ba409c6b62d10ea6c3db6b /gettext-tools/src/x-perl.c | |
| parent | 765fd7ab5f5b28ba0db87f3325c7042d194a9530 (diff) | |
| download | external_gettext-5ea8c31fe01181f47961977fc513e7c8ba2785b6.zip external_gettext-5ea8c31fe01181f47961977fc513e7c8ba2785b6.tar.gz external_gettext-5ea8c31fe01181f47961977fc513e7c8ba2785b6.tar.bz2 | |
Support extraction of contexts in GNOME glib syntax.
Diffstat (limited to 'gettext-tools/src/x-perl.c')
| -rw-r--r-- | gettext-tools/src/x-perl.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gettext-tools/src/x-perl.c b/gettext-tools/src/x-perl.c index 5981f6b..f59e3d4 100644 --- a/gettext-tools/src/x-perl.c +++ b/gettext-tools/src/x-perl.c @@ -1,5 +1,5 @@ /* xgettext Perl backend. - Copyright (C) 2002-2005 Free Software Foundation, Inc. + Copyright (C) 2002-2006 Free Software Foundation, Inc. This file was written by Guido Flohr <guido@imperia.net>, 2002-2003. @@ -1505,6 +1505,8 @@ extract_variable (message_list_ty *mlp, token_ty *tp, int first) shapes.shapes[0].argnum1 = 1; shapes.shapes[0].argnum2 = 0; shapes.shapes[0].argnumc = 0; + shapes.shapes[0].argnum1_glib_context = false; + shapes.shapes[0].argnum2_glib_context = false; shapes.shapes[0].argtotal = 0; /* Extract a possible string from the key. Before proceeding |