[Bug: 21.4.11] desktop.el saves buffers without file names

================================================================ Dear Bug Team! desktop.el saves buffers without file names I'm not certain why it does this when it never did before but in any case the fix is trivial: *** desktop.el Thu Feb 27 15:28:54 2003 --- desktop.el.original Wed Nov 6 20:13:59 2002 *************** *** 480,487 **** FILENAME is the visited file name, BUFNAME is the buffer name, and MODE is the major mode." (let ((case-fold-search nil)) ! (and filename ! (not (string-match desktop-buffers-not-to-save bufname)) (not (memq mode desktop-modes-not-to-save)) (or (and filename (not (string-match desktop-files-not-to-save filename))) --- 480,486 ---- FILENAME is the visited file name, BUFNAME is the buffer name, and MODE is the major mode." (let ((case-fold-search nil)) ! (and (not (string-match desktop-buffers-not-to-save bufname)) (not (memq mode desktop-modes-not-to-save)) (or (and filename (not (string-match desktop-files-not-to-save filename))) I don't think it is relevant, but for completeness this is how I use "desktop" ;-><-:-><-;-><-:-><-;-><-:-><-;-><-:-><-;-><-:-><-;-><-:-><-;-><-:-><-; ; desktop (require 'desktop) (setq desktop-globals-to-save (append '((read-command-history . 99) (file-name-history . 99) (grep-history . 99) (grep-find-history . 99) (compile-history . 99) (minibuffer-history . 99) (gud-perldb-history . 99) (hypropos-regexp-history . 99)) desktop-globals-to-save)) (defun sv1 () (desktop-truncate search-ring 99) (desktop-truncate regexp-search-ring 99) (desktop-save "~/")) (defun sv () (interactive) (save-some-buffers t) (sv1)) (global-set-key 'f2 'sv) (remove-hook 'kill-emacs-hook 'desktop-kill) (defun toms-kill-emacs-hook () (set-variable 'font-lock-maximum-size 0) (sv1)) (add-hook 'kill-emacs-hook 'toms-kill-emacs-hook t) (desktop-load-default) (condition-case nil (desktop-read)) ================================================================ System Info to help track down your bug: --------------------------------------- uname -a: CYGWIN_NT-5.0 TSUNAMI 1.3.12(0.54/3/2) 2002-07-06 02:16 i686 unknown ./configure '--with-dragndrop' '--with-postgresql=no' '--with-x=no' '--bindir=/usr/local/bin/i686-pc-cygwin' '--with-site-lisp=yes' '--with-ipv6-cname=no' '--with-netinstall' XEmacs 21.4.11 "Native Windows TTY Support (Windows)" configured for `i686-pc-cygwin'. Compilation / Installation: Source code location: /development/xemacs/xemacs-21.4-release Installation prefix: /usr/local Operating system description file: `s/cygwin32.h' Machine description file: `m/intel386.h' Compiler: gcc -I/usr/lib/../include/noX -I/usr/lib/../include/noX -g -O3 -Wall -Wno-switch -Winline -Wmissing-prototypes -Wsign-compare -Wshadow -Wpointer-arith Relocating allocator for buffers: no GNU version of malloc: yes Window System: Compiling in support for the Microsoft window system. Using MS-Windows menubars. Using MS-Windows scrollbars. Using MS-Windows dialog boxes. Using MS-Windows native widgets. Compiling in support for Drag'n'Drop (EXPERIMENTAL). - Drag'n'Drop prototype: msw. TTY: Compiling in support for ncurses. Images: Compiling in support for GIF images (builtin). Compiling in support for XPM images. Compiling in support for PNG images. Compiling in support for JPEG images. Compiling in support for TIFF images. Compiling in support for X-Face message headers. Sound: Compiling in support for sound (native). Databases: Compiling in support for GNU DBM. Internationalization: Compiling in support for file coding. Mail: Compiling in support for POP mail retrieval. Other Features: Inhibiting IPv6 canonicalization at startup. Compiling in support for dynamic shared object modules. Load-Path Lisp Shadows: ---------------------- (/home/tom/elisp/hide-copyleft /usr/local/lib/xemacs/xemacs-packages/lisp/xemacs-devel/hide-copyleft /usr/local/lib/xemacs/xemacs-packages/lisp/build/build-report /usr/local/lib/xemacs-21.4.11/lisp/build-report) Installed XEmacs Packages: ------------------------- ((zenirc:version 1.13 :type regular) (xslt-process :version 1.11 :type regular) (xslide :version 1.04 :type regular) (xemacs-devel :version 1.5 :type single-file) (xemacs-base :version 1.75 :type regular) (w3 :version 1.28 :type regular) (vm :version 7.07 :type regular) (viper :version 1.35 :type regular) (view-process :version 1.12 :type regular) (vhdl :version 1.16 :type regular) (vc-cc :version 1.21 :type regular) (vc :version 1.35 :type regular) (tramp :version 1.11 :type regular) (tpu :version 1.12 :type regular) (tooltalk :version 1.13 :type regular) (tm :version 1.35 :type regular) (time :version 1.12 :type regular) (textools :version 1.14 :type regular) (text-modes :version 1.58 :type single-file) (texinfo :version 1.23 :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.07000000000000001 :type regular) (slider :version 1.13 :type regular) (sieve :version 1.11 :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.12 :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.38 :type regular) (ps-print :version 1.08 :type regular) (prog-modes :version 1 .72 :type single-file) (pgg :version 1.02 :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.3 :type single-file) (ocaml :version 0.04 :type regular) (net-utils :version 1.31 :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.17 :type regular) (mew :version 1.17 :type regular) (mailcrypt :version 2.12 :type regular) (mail-lib :version 1.56 :type regular) (liece :version 1.1 :type regular) (jde :version 1.43 :type regular) (ispell :version 1.24 :type regular) (ilisp :version 1.29 :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.18 :type regular) (haskell-mode :version 1.05 :type regular) (gnus :version 1.65 :type regular) (gnats :version 1.15 :type regular) (games :version 1.13 :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.37 :type regular) (eterm :version 1.13 :type regular) (ess :version 1.03 :type regular) (eshell :version 1.04 :type regular) (emerge :version 1.09 :type regular) (elib :version 1.1 :type single-file) (eieio :version 1.04 :type regular) (efs :version 1.29 :type regular) (edt :version 1.12 :type regular) (edit-utils :version 1.98 :type single-file) (ediff :version 1.46 :type regular) (edebug :version 1.15 :type regular) (ecrypto :version 0.12 :type regular) (ecb :version 1.01 :type regular) (docbookide :version 0.06 :type regular) (dired :version 1.13 :type regular) (dictionary :version 1.11 :type regular) (debug :version 1.16 :type regular) (crisp :version 1.12 :type regular) (cookie :version 1.14 :type regular) (clearcase :version 1.04 :type regular) (cc-mode :version 1.32 :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.21 :type regular) (auctex :version 1.33 :type regular) (apel :version 1.26 :type regular) (ada :version 1.13 :type regular) (Sun :version 1.13 :type regular)) Installed Modules: ----------------- Features: -------- (bbdb timezone mail-abbrevs xemacsbug shadow man yow cookie1 smtpmail sendmail rfc822 info hide-copyleft semantic-el jde jde-open-source executable jde-import jde-java-font-lock jde-which-method jde-java-grammar jde-wiz jde-complete senator eldoc browse-url jde-gen tempo jde-run jde-jdb jde-bug jde-dbs jde-dbo jde-db jde-parse jde-imenu semantic-imenu semantic-java thingatpt avltree stack-m elib-node semantic-bnf semantic-sb semantic-ia-sb semantic-analyze semantic-ctxt semantic-cb eieio-base eieio-speedbar eieio-custom speedbar sb-image dframe semantic-util-modes timer semantic-util semantic assoc working jde-compile compile cus-edit cus-load cc-mode cc-align cc-cmds cc-engine cc-styles cc-langs cc-vars cc-menus imenu cc-defs semantic-load jde-help jde-util jde-widgets tree-widget efc wid-edit beanshell eieio view-less view efs-cu desktop sql regexp-opt comint mm mule-sysdp pending-del rsz-minibuf advice advice-preload uniquify filladapt vc ring vc-hooks font-lock icomplete cus-face dired-faces dired-xemacs dired savehist locate ffap zenirc-autoloads xslt-process-autoloads xslide-autoloads xemacs-devel-autoloads xemacs-base-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-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 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 tty-frames tty toolbar native-sound scrollbar unix-processes multicast network-streams subprocesses modules menu-accelerator-support menubar dbm md5 xemacs gutter tiff png gif jpeg xface xpm xbm lisp-float-type cygwin32 dragdrop-api dialog devices window-system base64) ------------------------------------------------------------------------ shhhhh! They might be listening ... SCUD missile Kibo SDI Soviet Albania AK-47 JFK Cocaine Ft. Meade encryption colonel NSA cryptographic FSF Paula Corbin Jones Chemicals, n.: Noxious substances from which modern foods are made.