now all org code blocks are evaluated without confirmation

init.org

@@ -419,31 +419,23 @@ Windows Theme:
         org-src-tab-acts-natively t))
 #+END_SRC
 ** languages
-#+BEGIN_SRC emacs-lisp
-  (org-babel-do-load-languages
-   'org-babel-load-languages
-   '((emacs-lisp . t)
-     (gnuplot . t)
-     (js . t)
-     (latex . t)
-     (lisp . t)
-     (python . t)
-     (shell . t)
-     (sqlite . t)
-     (org . t)
-     (R . t)
-     (scheme . t)
-     ))
-
-  (defun me--org-confirm-babel-evaluate (lang body)
-    "Do not confirm evaluation for these languages."
-    (not (or (string= lang "python")
-             (string= lang "ipython")
-             (string= lang "emacs-lisp")
-             (string= lang "R")
-             (string= lang "latex")
-             (string= lang "sqlite"))))
-  (setq org-confirm-babel-evaluate 'me--org-confirm-babel-evaluate)
+Set some languages and disable confirmation for evaluating code blocks C-c C-c
+#+BEGIN_SRC emacs-lisp
+(org-babel-do-load-languages
+ 'org-babel-load-languages
+ '((emacs-lisp . t)
+   (gnuplot . t)
+   (js . t)
+   (latex . t)
+   (lisp . t)
+   (python . t)
+   (shell . t)
+   (sqlite . t)
+   (org . t)
+   (R . t)
+   (scheme . t)))
+
+(setq org-confirm-babel-evaluate nil)
 #+END_SRC
 ** habits
 #+BEGIN_SRC emacs-lisp