Re: [Alphacocoa-devel] Perl Mode Error

[Bernard D. <bde...@or...>]

Hi Eberhard ,

Indeed I see the bug. Very easy to fix: in file perlEngine.tcl remove lines 17-18 that say:
<<
# load main Perl file
perlMenu
>>

This has nothing to do with application helpers, it's just a self recursion within Perl mode files. 

Cheers,
Bernard 

Envoyé de mon iPhone

> Le 31 juil. 2019 à 14:12, Dr Eberhard W Lisse <el...@li...> a écrit :
> 
> Bernard,
> 
> I have added the Perl Menu in Mode Menu(1) of 9.0.7 and am getting this
> error message:
> 
> 
> self-referential recursion in "unknown" for command "perlMenu"
>    while executing
> "perlMenu"
>    (file "/Applications/Alpha.app/Contents/Resources/Libraries/AlphaTcl/Tcl/Modes/Perl Mode/perlEngine.tcl" line 18)
>    invoked from within
> "::__enc_source -encoding utf-8 {/Applications/Alpha.app/Contents/Resources/Libraries/AlphaTcl/Tcl/Modes/Perl Mode/perlEngine.tcl}"
>    ("uplevel" body line 1)
>    invoked from within
> "uplevel 1 [list ::__enc_source -encoding $enc $fileName]"
>    (procedure "source" line 16)
>    invoked from within
> "source {/Applications/Alpha.app/Contents/Resources/Libraries/AlphaTcl/Tcl/Modes/Perl Mode/perlEngine.tcl}"
>    (in namespace eval "::" script line 1)
>    invoked from within
> "namespace eval :: $auto_index($name)"
>    (procedure "auto_load" line 13)
>    invoked from within
> "auto_load $name [uplevel 1 {::namespace current}]"
>    (autoloading "perlEngine.tcl")
>    (procedure "::unknown" line 22)
>    invoked from within
> "perlEngine.tcl"
>    invoked from within
> "catch $do err"
> 
> 
> I use /usr/local/bin/perl and so I looked in Global Setup Helper
> Application Advanced(1).  I executed the execPerl option switched to
> /usr/local/perl, eventually, and tried again.  Same error, and now the
> execPerl is not in the Helper Application screen at all any more.
> 
> I can not find a button at add a new Helper in the screen.
> 
> Any idea?
> 
> el
> 
> 
> -- 
> Dr. Eberhard W. Lisse          / Obstetrician & Gynaecologist (Saar)
> el...@li...            / *     |   Telephone: +264 81 124 6733 (cell)
> PO Box 8421                  /
> Bachbrecht, Namibia     ;____/  
> 
> 
> _______________________________________________
> AlphaCocoa-devel mailing list
> Alp...@li...
> https://lists.sourceforge.net/lists/listinfo/alphacocoa-devel