| … | |
… | |
| 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 |
