Re: [Jed-users-l] Problems with Perl files

[Manfred Hanke <Manfred.Hanke@xxxxxxxxxxxxxxxxxxxxxxxxxx>]

Hi Daniel,

you can undefine Ctrl-C from the perl keymap in a perl_mode_hook (which 
is executed while activating perl mode), and (re)assign it to the 
command you prefer, by putting the following lines in your ~/.jedrc:

define perl_mode_hook()
{
    undefinekey("^C", "perl");
    local_setkey("yp_copy_region_as_kill", "^C");  % Copy (cua default)
}

I don't know whether there is a more elegant way to have jed reconsider 
the Global keymap after ^C has been undefined?

Cheers,

Manfred



Daniel Carrera wrote:
> Hello,
>
> This is strange. I have the CUA bindings, but when I edit *Perl*
> files, the Ctrl-C stops working (it should copy text). I think I found
> the offending part of perl.sl:
>
> $1 = "perl";
> !if (keymap_p ($1)) make_keymap($1);
> !if (is_defined("Win_Keys") ) {  % conflict with windows region copy
>      definekey("perl_help",	"^C?", $1);
>      definekey("perl_check",	"^Cc", $1);
>      definekey("perl_exec",	"^Ce", $1);
>      definekey("perl_info",	"^Ci", $1);
>      definekey("perl_indent_region", "^C\t", $1);
>      definekey("perltidy",	"^C^T", $1);
> }
>
> Short of deleting this block from the system-wide perl.sl file, is
> there anything I can do to recover my Ctrl-C key binding?
>
> Daniel.
_______________________________________________
Jed-users-l mailing list
Jed-users-l@xxxxxxxx
http://mailman.jtan.com/mailman/listinfo/jed-users-l