diff --git a/lisp/ob-core.el b/lisp/ob-core.el
index 65fa47ab5..a2a84ad20 100644
--- a/lisp/ob-core.el
+++ b/lisp/ob-core.el
@@ -2427,12 +2427,13 @@ INFO may provide the values of these header arguments (in the
 		  (delete-region (point) (org-babel-result-end)))
 		 ((member "append" result-params)
 		  (goto-char (org-babel-result-end)) (setq beg (point-marker)))
-		 ((member "prepend" result-params))) ; already there
+		 ;; ((member "prepend" result-params)) ; Do nothing.  Already there.
+                 )
 		(setq results-switches
 		      (if results-switches (concat " " results-switches) ""))
 		(let ((wrap
-		       (lambda (start finish &optional no-escape no-newlines
-				      inline-start inline-finish)
+		       (lambda ( start finish &optional no-escape no-newlines
+			    inline-start inline-finish)
 			 (when inline
 			   (setq start inline-start)
 			   (setq finish inline-finish)
diff --git a/lisp/org.el b/lisp/org.el
index c93b4961f..ec416d312 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -18676,6 +18676,10 @@ block from point."
 	      (throw 'exit n)))))
       nil)))
 
+;; Defined in org-agenda.el
+(defvar org-agenda-restrict)
+(defvar org-agenda-restrict-begin)
+(defvar org-agenda-restrict-end)
 (defun org-occur-in-agenda-files (regexp &optional _nlines)
   "Call `multi-occur' with buffers for all agenda files."
   (interactive "sOrg-files matching: ")