[Bug: 21.4.13] DEL key in TCL mode

--text follows this line-- ================================================================ Dear Bug Team! If editing a TCL file, the DEL key always do "delete-backward" even it was set to "delete-forward" in the Options/Advanced/Emacs/Editing/Basic manual. In addition, the "Delete Keys Deletes Selection" function doesn't work in tcl mode as well. ================================================================ System Info to help track down your bug: --------------------------------------- OS version: Microsoft Windows 2000 [Version 5.00.2195] OS: Windows_NT XEmacs 21.4.13 "Rational FORTRAN" configured for `i586-pc-win32'. Building XEmacs in "d:\\xemacs\\xemacs-21.4-release\\nt". Using compiler "cl -nologo -W3 -O2 -G5 -ML". Installing XEmacs in "c:\\Program Files\\XEmacs\\XEmacs-21.4.13". Package path is "~\\.xemacs;;c:\\Program Files\\XEmacs\\site-packages;c:\\Program Files\\XEmacs\\xemacs-packages". Compiling in support for Microsoft Windows native GUI. Compiling in support for XPM images. Compiling in support for GIF images. Compiling in support for PNG images. Compiling in support for TIFF images. Compiling in support for JPEG images. Compiling in support for X-Face message headers. Compiling in support for toolbars. Compiling in support for dialogs. Compiling in support for widgets. Compiling in support for native sounds. Compiling in fast dired implementation. Using portable dumper. Load-Path Lisp Shadows: ---------------------- (c:\Program Files\XEmacs\xemacs-packages\lisp\ps-print\ps-print c:\Program Files\XEmacs\xemacs-packages\lisp\ps-print-nomule\ps-print c:\Program Files\XEmacs\xemacs-packages\lisp\build\build-report c:\Program Files\XEmacs\XEmacs-21.4.13\lisp\build-report) Installed XEmacs Packages: ------------------------- ((zenirc:version 1.13 :type regular) (xslt-process :version 1.11 :type regular) (xslide :version 1.07 :type regular) (xemacs-devel :version 1.55 :type single-file) (xemacs-base :version 1.78 :type regular) (x-symbol :version 1.05 :type regular) (w3 :version 1.28 :type regular) (vm :version 7.14 :type regular) (viper :version 1.36 :type regular) (view-process :version 1.12 :type regular) (vhdl :version 1.17 :type regular) (vc-cc :version 1.21 :type regular) (vc :version 1.37 :type regular) (tramp :version 1.15 :type regular) (tpu :version 1.12 :type regular) (tooltalk :version 1.13 :type regular) (tm :version 1.36 :type regular) (time :version 1.13 :type regular) (textools :version 1.14 :type regular) (text-modes :version 1.61 :type single-file) (texinfo :version 1.24 :type regular) (supercite :version 1.19 :type regular) (strokes :version 1.08 :type regular) (speedbar :version 1.26 :type regular) (sounds-wav :version 1.1 :type regular) (sounds-au :version 1.1 :type regular) (sml-mode :version 0.09 :type regular) (slider :version 1.13 :type regular) (sieve :version 1.13 :type regular) (sh-script :version 1.17 :type regular) (sgml :version 1.08 :type regular) (semantic :version 1.17 :type regular) (scheme :version 1.13 :type regular) (sasl :version 1.13 :type regular) (ruby-modes :version 1.01 :type regular) (rmail :version 1.13 :type regular) (reftex :version 1.28 :type regular) (python-modes :version 1.02 :type single-file) (psgml-dtds :version 1.02 :type regular) (psgml :version 1.4 :type regular) (ps-print-nomule :version 1.05 :type regular) (ps-print :version 1.08 :type regular) (prog-modes :version 1 .79 :type single-file) (pgg :version 1.03 :type regular) (perl-modes :version 1.04 :type single-file) (pcomplete :version 1.02 :type regular) (pcl-cvs :version 1.64 :type regular) (pc :version 1.25 :type single-file) (os-utils :version 1.31 :type single-file) (ocaml :version 0.04 :type regular) (net-utils :version 1.32 :type single-file) (mmm-mode :version 1.0 :type regular) (misc-games :version 1.16 :type single-file) (mine :version 1.14 :type regular) (mh-e :version 1.23 :type regular) (mew :version 1.17 :type regular) (mailcrypt :version 2.12 :type regular) (mail-lib :version 1.59 :type regular) (liece :version 1.12 :type regular) (jde :version 1.45 :type regular) (ispell :version 1.24 :type regular) (ilisp :version 1.32 :type regular) (igrep :version 1.1 :type regular) (idlwave :version 1.28 :type regular) (ibuffer :version 1.08 :type regular) (hm--html-menus :version 1.21 :type regular) (haskell-mode :version 1.05 :type regular) (gnus :version 1.71 :type regular) (gnats :version 1.15 :type regular) (games :version 1.14 :type regular) (fsf-compat :version 1.12 :type single-file) (frame-icon :version 1.09 :type regular) (fortran-modes :version 1.02 :type single-file) (forms :version 1.14 :type regular) (footnote :version 1.15 :type regular) (eudc :version 1.38 :type regular) (eterm :version 1.13 :type regular) (ess :version 1.04 :type regular) (eshell :version 1.05 :type regular) (emerge :version 1.09 :type regular) (elib :version 1.1 :type single-file) (eieio :version 1.04 :type regular) (eicq :version 1.05 :type regular) (efs :version 1.29 :type regular) (edt :version 1.12 :type regular) (edit-utils :version 2.02 :type single-file) (ediff :version 1.47 :type regular) (edebug :version 1.18 :type regular) (ecrypto :version 0.13 :type regular) (ecb :version 1.08 :type regular) (docbookide :version 0.06 :type regular) (dired :version 1.13 :type regular) (dictionary :version 1.12 :type regular) (debug :version 1.16 :type regular) (crisp :version 1.12 :type regular) (cookie :version 1.14 :type regular) (clearcase :version 1.06 :type regular) (cc-mode :version 1.33 :type regular) (calendar :version 1.19 :type regular) (calc :version 1.23 :type regular) (c-support :version 1.16 :type single-file) (build :version 1.1 :type regular) (bbdb :version 1.23 :type regular) (auctex :version 1.35 :type regular) (apel :version 1.26 :type regular) (ada :version 1.13 :type regular) (Sun :version 1.13 :type regular)) Features: -------- (xemacsbug shadow hideshow vhdl-mode hippie-exp outline tramp shell trampver efs-auto shadowfile recent-files after-save-commands env reporter pending-del view-less view permanent-buffers bookmark pp info hyper-apropos xslide-process xslide-font xslide-abbrev xslide-data tags etags imenu xslide facemenu font disp-table speedbar sb-image dframe assoc tempo sgml-mode psgml psgml-html rpm-spec-mode makefile mh-identity mh-comp regexp-opt mh-xemacs-icons mh-e mh-xemacs-compat mh-utils gnus-cite gnus-art mm-uu mml2015 pgg pgg-parse pgg-def gnus-sum nnoo gnus-group gnus-undo nnmail mail-source format-spec gnus-start gnus-spec gnus-int gnus-range gnus-win executable mm-view mh-loaddefs mh-inc mh-customize highlight-headers ibuffer message mml mml-sec mml-smime smime dig mm-decode mm-bodies mm-encode mailcap mail-parse rfc2045 rfc2231 rfc2047 qp ietf-drums mail-abbrevs sendmail rfc822 mailheader canlock gnus gnus-ems gnus-xmas messagexmas nnheader nnheaderxm gnus-util netrc time-date parse-time mail-utils mm-util mail-prsvr mic-paren timer lazy-shot fast-lock font-lock package-get package-admin ps-print lpr efs-dired efs-x19.15 efs-fnh efs-ovwrt efs-netrc efs-defun efs efs-dump pcl-cvs diff-mode advice advice-preload pcl-cvs-parse pcl-cvs-info pcl-cvs-defs pcl-cvs-util cvs-compat dired-faces dired-xemacs dired cookie dll elib-node compile build-report config build cus-edit cus-load wid-edit tcl comint ring efs-cu cus-face paren blink-paren blink-cursor zenirc-autoloads xslt-process-autoloads xslide-autoloads xemacs-devel-autoloads xemacs-base-autoloads x-symbol-autoloads w3-autoloads vm-autoloads viper-autoloads view-process-autoloads vhdl-autoloads vc-cc-autoloads vc-autoloads tramp-autoloads tpu-autoloads tooltalk-autoloads tm-autoloads time-autoloads textools-autoloads text-modes-autoloads texinfo-autoloads supercite-autoloads strokes-autoloads speedbar-autoloads sounds-wav-autoloads sounds-au-autoloads sml-mode-autoloads slider-autoloads sieve-autoloads sh-script-autoloads sgml-autoloads semantic-autoloads scheme-autoloads sasl-autoloads ruby-modes-autoloads rmail-autoloads reftex-autoloads python-modes-autoloads psgml-dtds-autoloads psgml-autoloads ps-print-nomule-autoloads ps-print-autoloads prog-modes-autoloads pgg-autoloads perl-modes-autoloads pcomplete-autoloads pcl-cvs-autoloads pc-autoloads os-utils-autoloads ocaml-autoloads net-utils-autoloads mmm-mode-autoloads misc-games-autoloads mine-autoloads mh-e-autoloads mew-autoloads mailcrypt-autoloads mail-lib-autoloads liece-autoloads jde-autoloads ispell-autoloads ilisp-autoloads igrep-autoloads idlwave-autoloads ibuffer-autoloads hm--html-menus-autoloads haskell-mode-autoloads gnus-autoloads gnats-autoloads games-autoloads fsf-compat-autoloads frame-icon-autoloads fortran-modes-autoloads forms-autoloads footnote-autoloads eudc-autoloads eterm-autoloads ess-autoloads eshell-autoloads emerge-autoloads elib-autoloads eieio-autoloads eicq-autoloads efs-autoloads edt-autoloads edit-utils-autoloads ediff-autoloads edebug-autoloads ecrypto-autoloads ecb-autoloads docbookide-autoloads dired-autoloads dictionary-autoloads debug-autoloads crisp-autoloads cookie-autoloads clearcase-autoloads cc-mode-autoloads calendar-autoloads calc-autoloads c-support-autoloads build-autoloads bbdb-autoloads auctex-autoloads apel-autoloads ada-autoloads Sun-autoloads lisp-autoloads loadhist auto-show fontl-hooks code-cmds gutter-items menubar-items x-menubar dragdrop mode-motion mouse itimer auto-save lisp-mode easymenu iso8859-1 page buff-menu lib-complete help-nomule cus-file derived frame text-props obsolete cus-start custom widget cl-extra mini-cl cl cl-19 packages backquote very-early-lisp file-coding mswindows-scrollbars mswindows toolbar native-sound scrollbar network-streams subprocesses menu-accelerator-support menubar md5 xemacs gutter tiff png gif jpeg xface xpm xbm lisp-float-type windows-nt dragdrop-api dialog devices window-system base64) Recent keystrokes: ----------------- : SPC % d right right right right right right right right right right right right right BS BS BS BS BS BS BS BS BS BS BS BS BS right right right right DEL right BS misc-user button1 button1up button2 button2up misc-user button1 button1up button2 button2up % f right right right SPC y down home right BS down right BS misc-user misc-user misc-user misc-user button1 button1up misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user misc-user Recent messages (most recent first): ----------------------------------- Loading xemacsbug...done Loading xemacsbug... Loading about...done Loading about... Updating speedbar to: c:\Tcl\my_scripts\...done Attempt to delete a surrogate minibuffer frame: #<mswindows-frame "emacs" 0x901> Updating speedbar to: c:\Tcl\my_scripts\... Updating speedbar to: c:\Documents and Settings\Joe & Jocelyn.CO63446-A\Local Settings\Temporary Internet Files\OLK252\...done Updating speedbar to: c:\Documents and Settings\Joe & Jocelyn.CO63446-A\Local Settings\Temporary Internet Files\OLK252\... Wrote c:\Tcl\my_scripts\scan_test.tcl Wrote c:\Tcl\my_scripts\scan_test.tcl Wrote c:\Tcl\my_scripts\scan_test.tcl Wrote c:\Tcl\my_scripts\scan_test.tcl Wrote c:\Tcl\my_scripts\scan_test.tcl Wrote c:\Tcl\my_scripts\scan_test.tcl Wrote c:\Tcl\my_scripts\scan_test.tcl Refreshing speedbar...done Refreshing speedbar... Wrote c:\Tcl\my_scripts\scan_test.tcl Updating speedbar to: c:\Tcl\my_scripts\...done