From mboxrd@z Thu Jan 1 00:00:00 1970 From: James TD Smith Subject: [misc-new-features 5/5] Fix a problem I was having with plots using a script. Org-plot was deleting the data file before gnuplot read it in. I've moved the deletion of the temporary data file to an idle timer, which has fixed the problem. Date: Mon, 13 Jul 2009 09:28:02 +0100 Message-ID: <1247473682-23338-6-git-send-email-ahktenzero@mohorovi.cc> References: <1247473682-23338-1-git-send-email-ahktenzero@mohorovi.cc> <1247473682-23338-2-git-send-email-ahktenzero@mohorovi.cc> <1247473682-23338-3-git-send-email-ahktenzero@mohorovi.cc> <1247473682-23338-4-git-send-email-ahktenzero@mohorovi.cc> <1247473682-23338-5-git-send-email-ahktenzero@mohorovi.cc> Return-path: Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1MQHaS-0002mg-Ep for emacs-orgmode@gnu.org; Mon, 13 Jul 2009 05:12:40 -0400 Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1MQHaN-0002ku-Tq for emacs-orgmode@gnu.org; Mon, 13 Jul 2009 05:12:40 -0400 Received: from [199.232.76.173] (port=49000 helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1MQHaN-0002kr-Mz for emacs-orgmode@gnu.org; Mon, 13 Jul 2009 05:12:35 -0400 Received: from 81-86-40-42.dsl.pipex.com ([81.86.40.42]:62600 helo=yog-sothoth.mohorovi.cc) by monty-python.gnu.org with esmtps (TLS-1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.60) (envelope-from ) id 1MQHaM-0008Sq-Mm for emacs-orgmode@gnu.org; Mon, 13 Jul 2009 05:12:35 -0400 In-Reply-To: <1247473682-23338-5-git-send-email-ahktenzero@mohorovi.cc> List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: emacs-orgmode@gnu.org --- lisp/org-plot.el | 14 +++++++------- 1 files changed, 7 insertions(+), 7 deletions(-) diff --git a/lisp/org-plot.el b/lisp/org-plot.el index 0e8f5a2..c9d61b3 100644 --- a/lisp/org-plot.el +++ b/lisp/org-plot.el @@ -333,12 +333,12 @@ line directly before or after the table." (with-temp-buffer (if (plist-get params :script) ;; user script (progn (insert - (org-plot/gnuplot-script data-file num-cols params t)) - (insert "\n") - (insert-file-contents (plist-get params :script)) - (goto-char (point-min)) - (while (re-search-forward "$datafile" nil t) - (replace-match data-file nil nil))) + (org-plot/gnuplot-script data-file num-cols params t)) + (insert "\n") + (insert-file-contents (plist-get params :script)) + (goto-char (point-min)) + (while (re-search-forward "$datafile" nil t) + (replace-match data-file nil nil))) (insert (org-plot/gnuplot-script data-file num-cols params))) ;; graph table @@ -346,7 +346,7 @@ line directly before or after the table." (gnuplot-send-buffer-to-gnuplot)) ;; cleanup (bury-buffer (get-buffer "*gnuplot*")) - (delete-file data-file)))) + (run-with-idle-timer 0.1 nil (lambda () (delete-file data-file)))))) (provide 'org-plot) -- 1.6.3.3