[elpa] externals/org e0535fa 39/85: ob-sql.el (org-babel-expand-body:sql): Support :prologue :epilogue

[ELPA Syncer]

branch: externals/org
commit e0535fa2d8215ba9a9f96058807648df72e2d99d
Author: Rodrigo Morales <rodrigo.morales@utec.edu.pe>
Commit: Bastien <bzg@gnu.org>

    ob-sql.el (org-babel-expand-body:sql): Support :prologue :epilogue
    
    * lisp/ob-sql.el (org-babel-expand-body:sql): Add support for
    :prologue and :epilogue parameters.
    
    TINYCHANGE
---
 lisp/ob-sql.el | 11 +++++++++--
 1 file changed, 9 insertions(+), 2 deletions(-)

diff --git a/lisp/ob-sql.el b/lisp/ob-sql.el
index ee19946..dc54139 100644
--- a/lisp/ob-sql.el
+++ b/lisp/ob-sql.el
@@ -93,8 +93,15 @@
 
 (defun org-babel-expand-body:sql (body params)
   "Expand BODY according to the values of PARAMS."
-  (org-babel-sql-expand-vars
-   body (org-babel--get-vars params)))
+  (let ((prologue (cdr (assq :prologue params)))
+       (epilogue (cdr (assq :epilogue params))))
+  (mapconcat 'identity
+             (list
+              prologue
+              (org-babel-sql-expand-vars
+               body (org-babel--get-vars params))
+              epilogue)
+             "\n")))
 
 (defun org-babel-edit-prep:sql (info)
   "Set `sql-product' in Org edit buffer.