From: Kyle Meyer <kyle@kyleam.com>
To: Richard Stanton <stanton@haas.berkeley.edu>
Cc: emacs-orgmode@gnu.org
Subject: Re: Extraneous output from Python code blocks using :session option
Date: Wed, 11 Mar 2015 14:29:45 -0400 [thread overview]
Message-ID: <87r3sv2xra.fsf@kyleam.com> (raw)
In-Reply-To: <1931A590-8B23-4412-86C7-F3571EC466FF@haas.berkeley.edu> (Richard Stanton's message of "Tue, 10 Mar 2015 20:38:25 -0700")
[-- Attachment #1: Type: text/plain, Size: 1125 bytes --]
Richard Stanton <stanton@haas.berkeley.edu> wrote:
> I'm trying to use the :session option so I can import modules, etc.,
> just once at the beginning of my document, like with am IPython
> notebook. Unfortunately, the output from these code blocks contains
> some extraneous characters. For example:
>
> #+BEGIN_SRC python :session :results output
> a = 2
> b = 3
> c = 4
> print 'a= ', a
> print 'b = ', b
> print 'a + b = ', a+b
> #+END_SRC
>
> #+RESULTS:
> :
> : >>> >>> a= 2
> : b = 3
> : a + b = 5
I also see this behavior. I asked the list some time ago [1], but I
didn't follow up beyond the initial email.
> How can I stop the production of all those ">" signs (sometimes
> they're dots), which don't appear if I run the same code block without
> the :session option?
I've attached a patch that seems to fix the example you gave and the
cases from my earlier email. I don't know enough about babel's
internals to know if it is a good way to fix it, but at least it might
serve as a quick fix for you until there is a better solution.
[1] http://thread.gmane.org/gmane.emacs.orgmode/79014
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: 0001-ob-python.el-Strip-leading-session-characters.patch --]
[-- Type: text/x-diff, Size: 2137 bytes --]
From cfa2783e03152871c0d703a6f79e96254dbe6c44 Mon Sep 17 00:00:00 2001
From: Kyle Meyer <kyle@kyleam.com>
Date: Wed, 11 Mar 2015 14:17:09 -0400
Subject: [PATCH] ob-python.el: Strip leading session characters
* lisp/ob-python.el (org-babel-python-evaluate-session): Strip leading
"..." and ">>>" from session output.
(org-babel-python-strip-session-chars): New function.
---
lisp/ob-python.el | 30 ++++++++++++++++++++----------
1 file changed, 20 insertions(+), 10 deletions(-)
diff --git a/lisp/ob-python.el b/lisp/ob-python.el
index dd3cc66..0267f22 100644
--- a/lisp/ob-python.el
+++ b/lisp/ob-python.el
@@ -306,16 +306,17 @@ (defun org-babel-python-evaluate-session
(results
(case result-type
(output
- (mapconcat
- #'org-babel-trim
- (butlast
- (org-babel-comint-with-output
- (session org-babel-python-eoe-indicator t body)
- (funcall input-body body)
- (funcall send-wait) (funcall send-wait)
- (insert org-babel-python-eoe-indicator)
- (funcall send-wait))
- 2) "\n"))
+ (org-babel-python-strip-session-chars
+ (mapconcat
+ #'org-babel-chomp
+ (butlast
+ (org-babel-comint-with-output
+ (session org-babel-python-eoe-indicator t body)
+ (funcall input-body body)
+ (funcall send-wait) (funcall send-wait)
+ (insert org-babel-python-eoe-indicator)
+ (funcall send-wait))
+ 2) "\n")))
(value
(let ((tmp-file (org-babel-temp-file "python-")))
(org-babel-comint-with-output
@@ -339,6 +340,15 @@ (defun org-babel-python-read-string (string)
(match-string 1 string)
string))
+(defun org-babel-python-strip-session-chars (string)
+ "Remove leading >>> and ... from Python session output."
+ (with-temp-buffer
+ (insert string)
+ (goto-char (point-min))
+ (when (looking-at "\\s-*\\(\\(>>> \\)*\\(\\.\\.\\. \\)*\\)")
+ (delete-region (match-beginning 1) (match-end 1)))
+ (buffer-string)))
+
(provide 'ob-python)
--
2.3.2
[-- Attachment #3: Type: text/plain, Size: 9 bytes --]
--
Kyle
next prev parent reply other threads:[~2015-03-11 18:29 UTC|newest]
Thread overview: 12+ messages / expand[flat|nested] mbox.gz Atom feed top
2015-03-11 3:38 Extraneous output from Python code blocks using :session option Richard Stanton
2015-03-11 18:29 ` Kyle Meyer [this message]
2015-03-11 18:54 ` Richard Stanton
2015-03-12 15:17 ` John Kitchin
2015-03-12 15:34 ` Richard Stanton
2015-03-12 21:23 ` Kyle Meyer
2015-03-13 6:58 ` Kyle Meyer
2015-03-13 8:21 ` Nicolas Goaziou
2015-03-13 14:40 ` Kyle Meyer
2015-03-14 8:26 ` Nicolas Goaziou
2015-03-16 0:40 ` Kyle Meyer
2015-03-12 21:21 ` Kyle Meyer
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87r3sv2xra.fsf@kyleam.com \
--to=kyle@kyleam.com \
--cc=emacs-orgmode@gnu.org \
--cc=stanton@haas.berkeley.edu \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).