… | |
… | |
374 | my $htype = shift; |
374 | my $htype = shift; |
375 | |
375 | |
376 | if ($htype == 0) { # INIT |
376 | if ($htype == 0) { # INIT |
377 | my @dirs = ((split /:/, $TERM->resource ("perl_lib")), "$LIBDIR/perl"); |
377 | my @dirs = ((split /:/, $TERM->resource ("perl_lib")), "$LIBDIR/perl"); |
378 | |
378 | |
379 | for my $ext (split /:/, $TERM->resource ("perl_ext")) { |
379 | for my $ext (map { split /:/, $TERM->resource ("perl_ext_$_") } 1, 2) { |
380 | my @files = grep -f $_, map "$_/$ext", @dirs; |
380 | my @files = grep -f $_, map "$_/$ext", @dirs; |
381 | |
381 | |
382 | if (@files) { |
382 | if (@files) { |
383 | register_package script_package $files[0]; |
383 | register_package script_package $files[0]; |
384 | } else { |
384 | } else { |
… | |
… | |
461 | answerbackstring backgroundPixmap backspace_key boldFont boldItalicFont |
461 | answerbackstring backgroundPixmap backspace_key boldFont boldItalicFont |
462 | borderLess color cursorBlink cursorUnderline cutchars delete_key |
462 | borderLess color cursorBlink cursorUnderline cutchars delete_key |
463 | display_name embed ext_bwidth fade font geometry hold iconName |
463 | display_name embed ext_bwidth fade font geometry hold iconName |
464 | imFont imLocale inputMethod insecure int_bwidth intensityStyles |
464 | imFont imLocale inputMethod insecure int_bwidth intensityStyles |
465 | italicFont jumpScroll lineSpace loginShell mapAlert menu meta8 modifier |
465 | italicFont jumpScroll lineSpace loginShell mapAlert menu meta8 modifier |
466 | mouseWheelScrollPage name pastableTabs path perl_eval perl_ext |
466 | mouseWheelScrollPage name pastableTabs path perl_eval perl_ext_1 perl_ext_2 |
467 | perl_lib pointerBlank pointerBlankDelay preeditType print_pipe pty_fd |
467 | perl_lib pointerBlank pointerBlankDelay preeditType print_pipe pty_fd |
468 | reverseVideo saveLines scrollBar scrollBar_align scrollBar_floating |
468 | reverseVideo saveLines scrollBar scrollBar_align scrollBar_floating |
469 | scrollBar_right scrollBar_thickness scrollTtyKeypress scrollTtyOutput |
469 | scrollBar_right scrollBar_thickness scrollTtyKeypress scrollTtyOutput |
470 | scrollWithBuffer scrollstyle secondaryScreen secondaryScroll selectstyle |
470 | scrollWithBuffer scrollstyle secondaryScreen secondaryScroll selectstyle |
471 | shade term_name title transparent transparent_all tripleclickwords |
471 | shade term_name title transparent transparent_all tripleclickwords |