X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=perl%2FAmanda%2FCmdline.c;fp=perl%2FAmanda%2FCmdline.c;h=5a8d2ef374e042609cdafb508a722a23ae220b6f;hb=d28952249e392eb31bc8eecc53f6c477f30c617b;hp=e572b98d8a33b4ecba6545427213a823659371f9;hpb=949b8910a5e23c4285d0b1aedacfc82a14dc97a5;p=debian%2Famanda diff --git a/perl/Amanda/Cmdline.c b/perl/Amanda/Cmdline.c index e572b98..5a8d2ef 100644 --- a/perl/Amanda/Cmdline.c +++ b/perl/Amanda/Cmdline.c @@ -2720,6 +2720,11 @@ XS(SWIG_init) { sv_setsv(sv, SWIG_From_int SWIG_PERL_CALL_ARGS_1((int)(CMDLINE_EMPTY_TO_WILDCARD))); SvREADONLY_on(sv); } while(0) /*@SWIG@*/; + /*@SWIG:/usr/share/swig/2.0.4/perl5/perltypemaps.swg,65,%set_constant@*/ do { + SV *sv = get_sv((char*) SWIG_prefix "CMDLINE_EXACT_MATCH", TRUE | 0x2 | GV_ADDMULTI); + sv_setsv(sv, SWIG_From_int SWIG_PERL_CALL_ARGS_1((int)(CMDLINE_EXACT_MATCH))); + SvREADONLY_on(sv); + } while(0) /*@SWIG@*/; ST(0) = &PL_sv_yes; XSRETURN(1); }