[Emacs-diffs] Changes to emacs/src/callint.c

[Juanma Barranquero]

Index: emacs/src/callint.c
diff -c emacs/src/callint.c:1.116 emacs/src/callint.c:1.117
*** emacs/src/callint.c:1.116   Tue Jun 25 08:58:54 2002
--- emacs/src/callint.c Thu Jul 11 10:08:44 2002
***************
*** 198,204 ****
    Lisp_Object specs;
    Lisp_Object teml;
    Lisp_Object enable;
!   int speccount = specpdl_ptr - specpdl;
  
    /* The index of the next element of this_command_keys to examine for
       the 'e' interactive code.  */
--- 198,204 ----
    Lisp_Object specs;
    Lisp_Object teml;
    Lisp_Object enable;
!   int speccount = SPECPDL_INDEX ();
  
    /* The index of the next element of this_command_keys to examine for
       the 'e' interactive code.  */
***************
*** 541,547 ****
  
        case 'k':               /* Key sequence. */
          {
!           int speccount1 = specpdl_ptr - specpdl;
            specbind (Qcursor_in_echo_area, Qt);
            args[i] = Fread_key_sequence (build_string (callint_message),
                                          Qnil, Qnil, Qnil, Qnil);
--- 541,547 ----
  
        case 'k':               /* Key sequence. */
          {
!           int speccount1 = SPECPDL_INDEX ();
            specbind (Qcursor_in_echo_area, Qt);
            args[i] = Fread_key_sequence (build_string (callint_message),
                                          Qnil, Qnil, Qnil, Qnil);
***************
*** 569,575 ****
  
        case 'K':               /* Key sequence to be defined. */
          {
!           int speccount1 = specpdl_ptr - specpdl;
            specbind (Qcursor_in_echo_area, Qt);
            args[i] = Fread_key_sequence (build_string (callint_message),
                                          Qnil, Qt, Qnil, Qnil);
--- 569,575 ----
  
        case 'K':               /* Key sequence to be defined. */
          {
!           int speccount1 = SPECPDL_INDEX ();
            specbind (Qcursor_in_echo_area, Qt);
            args[i] = Fread_key_sequence (build_string (callint_message),
                                          Qnil, Qt, Qnil, Qnil);