earley@modular.UUCP (Joe Earley) (12/03/88)
Could someone tell me how to fix the gold key problem in the EDT emulation mode for Emacs 18.52? Naturally I missed any responses the first time around and now someone here HAS to have EDT. (sigh) -- Joe Earley, Modular Mining Systems USENET: {ihnp4,allegra,cmcl2,hao!noao}!arizona!modular!earley INTERNET: modular!earley@arizona.edu
idall@augean.OZ (Ian Dall) (12/12/88)
In article <618@modular.UUCP> earley@modular.UUCP (Joe Earley) writes: >Could someone tell me how to fix the gold key problem in the EDT >emulation mode for Emacs 18.52? Naturally I missed any responses >the first time around and now someone here HAS to have EDT. (sigh) Here is a repost of my previous reply: EDT emulation modes gold keys don't work because define-keypad-key is broken which is because function-key-sequence is broken which is beacause Fwhere_is_internal (C code) is broken. In keymap.c find Fwhere_is_internal, try changing: -------------------------------------------------------------------- elt = get_keyelt (elt); /* End this iteration if this element does not match the target. */ if (XTYPE (definition) == Lisp_Cons) { Lisp_Object tem; tem = Fequal (elt, definition); if (NULL (tem)) continue; } else if (!EQ (elt, definition)) continue; ----------------------------------------------------------------- To: ------------------------------------------------------------------- /* End this iteration if this element does not match the target. */ if (XTYPE (definition) == Lisp_Cons) { Lisp_Object tem; tem = Fequal (elt, definition); if (NULL (tem)) continue; } else { elt = get_keyelt (elt); if (!EQ (elt, definition)) continue; } --------------------------------------------------------------------- I have reported this bug to bug-gnu-emacs so it should eventually get into the official distribution. -- Ian Dall life (n). A sexually transmitted disease which afflicts some people more severely than others. idall@augean.oz