FidgetteSpinneur

(defun baba ()
  (interactive)
  (if 'mark-active
    (progn
      (sql-send-region (region-beginning) (region-end))
      (switch-to-buffer-other-window (current-buffer)))
    (mark-paragraph)))