From aa60b1a9bcc642704f1b94712521364939e47244 Mon Sep 17 00:00:00 2001 From: hanwen Date: Wed, 12 Jun 2002 08:25:19 +0000 Subject: [PATCH] heikki pats --- ChangeLog | 5 +++++ lilypond-mode.el | 6 ++++-- 2 files changed, 9 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index 44561f31d0..8dc0c187b6 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +2002-06-12 Heikki Junes + + * lilypond-mode.el: Propose saving before applying a command: + for saved buffer set default command to LilyPond. + 2002-06-11 Jan Nieuwenhuizen * buildscripts/mutopia-index.py (headertext_nopics): Add missing diff --git a/lilypond-mode.el b/lilypond-mode.el index ecba6f0084..5f194c5946 100644 --- a/lilypond-mode.el +++ b/lilypond-mode.el @@ -258,8 +258,10 @@ Must be the car of an entry in `LilyPond-command-alist'." (LilyPond-check-files (concat name ".tex") (list name) LilyPond-file-extensions) - ;; FIXME - (LilyPond-save-buffer) + (if (buffer-modified-p) + (if (y-or-n-p "Save buffer before next command? ") + (progn (LilyPond-save-buffer) + (setq LilyPond-command-default "LilyPond")))) ;;"LilyPond" LilyPond-command-default)) (t LilyPond-command-default))) -- 2.39.5