[slime-cvs] CVS update: slime/slime.el
Luke Gorrie
lgorrie at common-lisp.net
Tue Jun 15 17:01:04 UTC 2004
Update of /project/slime/cvsroot/slime
In directory common-lisp.net:/tmp/cvs-serv17998
Modified Files:
slime.el
Log Message:
(slime-compile-file): Just prompt for saving the current file instead
of calling `save-some-buffers'. Based on a patch from Brian Downing.
Date: Tue Jun 15 10:01:04 2004
Author: lgorrie
Index: slime/slime.el
diff -u slime/slime.el:1.312 slime/slime.el:1.313
--- slime/slime.el:1.312 Thu Jun 10 10:34:07 2004
+++ slime/slime.el Tue Jun 15 10:01:04 2004
@@ -2586,7 +2586,11 @@
(interactive)
(unless (eq major-mode 'lisp-mode)
(error "Only valid in lisp-mode"))
- (save-some-buffers)
+ (unless buffer-file-name
+ (error "Buffer %s is not associated with a file." (buffer-name)))
+ (when (and (buffer-modified-p)
+ (y-or-n-p (format "Save file %s? " (buffer-file-name))))
+ (save-buffer))
(let ((lisp-filename (slime-to-lisp-filename (buffer-file-name))))
(slime-insert-transcript-delimiter
(format "Compile file %s" lisp-filename))
More information about the slime-cvs
mailing list