widen buffer restrictions when inserting results

1 files changed, 2 insertions, 1 deletions

diff --git a/lisp/ob.el b/lisp/ob.el
index 660303c..263dfb0 100644
--- a/lisp/ob.el
+++ b/lisp/ob.el
@@ -1890,6 +1890,7 @@ code ---- the results are extracted in the syntax of the source
           inside of a #+BEGIN_SRC block with the source-code
           language set appropriately.  Note this relies on the
           optional LANG argument."
+  (save-restriction (widen)
   (if (stringp result)
       (progn
         (setq result (org-no-properties result))
@@ -2010,7 +2011,7 @@ code ---- the results are extracted in the syntax of the source
 	(if (member "value" result-params)
 	    (message "Code block returned no value.")
 	  (message "Code block produced no output."))
-      (message "Code block evaluation complete."))))
+      (message "Code block evaluation complete.")))))
 
 (defun org-babel-remove-result (&optional info)
   "Remove the result of the current source block."