ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/init.C
(Generate patch)

Comparing rxvt-unicode/src/init.C (file contents):
Revision 1.346 by sf-exg, Tue Jun 21 12:03:56 2016 UTC vs.
Revision 1.347 by sf-exg, Thu Jul 14 05:10:06 2016 UTC

… …
601 set_option (Opt_iso14755); 601 set_option (Opt_iso14755);
602 set_option (Opt_iso14755_52); 602 set_option (Opt_iso14755_52);
603 set_option (Opt_buffered); 603 set_option (Opt_buffered);
604} 604}
605 605
606#if ENABLE_PERL
607static void
608rxvt_perl_parse_resource (rxvt_term *term, const char *k, const char *v)
609{
610 rxvt_perl.parse_resource (term, k, false, false, 0, v);
611}
612#endif
613
606/*----------------------------------------------------------------------*/ 614/*----------------------------------------------------------------------*/
607const char ** 615const char **
608rxvt_term::init_resources (int argc, const char *const *argv) 616rxvt_term::init_resources (int argc, const char *const *argv)
609{ 617{
610 int i; 618 int i;
… …
648 if ((rs[Rs_perl_ext_1] && *rs[Rs_perl_ext_1]) 656 if ((rs[Rs_perl_ext_1] && *rs[Rs_perl_ext_1])
649 || (rs[Rs_perl_ext_2] && *rs[Rs_perl_ext_2]) 657 || (rs[Rs_perl_ext_2] && *rs[Rs_perl_ext_2])
650 || (rs[Rs_perl_eval] && *rs[Rs_perl_eval])) 658 || (rs[Rs_perl_eval] && *rs[Rs_perl_eval]))
651 { 659 {
652 rxvt_perl.init (this); 660 rxvt_perl.init (this);
661 enumerate_resources (rxvt_perl_parse_resource);
653 HOOK_INVOKE ((this, HOOK_INIT, DT_END)); 662 HOOK_INVOKE ((this, HOOK_INIT, DT_END));
654 } 663 }
655#endif 664#endif
656 665
657 // must be called after initialising the perl interpreter as it 666 // must be called after initialising the perl interpreter as it

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines