This is because it doesn't quote it. Adding a simple quote fixes it.
(defun org-babel-scheme-expand-header-arg-vars (vars)
"Expand :var header arguments given as VARS."
(mapconcat
(lambda (var)
(format "(define %S '%S)" (car var) (cdr var)))
vars
"\n"))Emacs : GNU Emacs 31.0.50 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.49, cairo version 1.18.4) Package: Org mode version 9.7.37 (9.7.37-80e962 @ /home/tusharhero/.emacs.d/elpa/org-9.7.37/)
