set face for org src begin/end

diff --git a/bba.org b/bba.org
index 58df4bb2a095324d9a14274baef0669d0f00b27b..d217b7c58dcc9955cb0d2425c9d9bff472cdb047 100644 (file)
--- a/bba.org
+++ b/bba.org
@@ -2142,26 +2142,33 @@ You have to work hard to be lazy.
 [[https://emacsfodder.github.io/emacs-theme-editor/][Emacs Theme Editor]] is a nice tool to define your colors.
 
 #+BEGIN_SRC emacs-lisp
-  (deftheme bba1 "DOCSTRING for bba1")
-    (custom-theme-set-faces 'bba1
-     '(default ((t (:foreground "#07e30d" :background "#282828" ))))
-     '(cursor ((t (:background "#f09213" ))))
-     '(fringe ((t (:background "#131313" ))))
-     '(mode-line ((t (:foreground "#282828" :background "#d96503" ))))
-     '(region ((t (:background "#7a7674" ))))
-     '(secondary-selection ((t (:background "#584e47" ))))
-     '(font-lock-builtin-face ((t (:foreground "#fe8019" ))))
-     '(font-lock-comment-face ((t (:foreground "#df7114" ))))
-     '(font-lock-function-name-face ((t (:foreground "#b8bb26" ))))
-     '(font-lock-keyword-face ((t (:foreground "#fb4934" ))))
-     '(font-lock-string-face ((t (:foreground "#b8bb26" ))))
-     '(font-lock-type-face ((t (:foreground "#d3869b" ))))
-     '(font-lock-constant-face ((t (:foreground "#d3869b" ))))
-     '(font-lock-variable-name-face ((t (:foreground "#83a598" ))))
-     '(minibuffer-prompt ((t (:foreground "#b8bb26" :bold t ))))
-     '(font-lock-warning-face ((t (:foreground "red" :bold t ))))
-     )
-  (provide-theme 'bba1)
+   (deftheme bba1 "DOCSTRING for bba1")
+     (custom-theme-set-faces 'bba1
+      '(default ((t (:foreground "#07e30d" :background "#282828" ))))
+      '(cursor ((t (:background "#f09213" ))))
+      '(fringe ((t (:background "#131313" ))))
+      '(mode-line ((t (:foreground "#282828" :background "#d96503" ))))
+      '(region ((t (:background "#7a7674" ))))
+      '(secondary-selection ((t (:background "#584e47" ))))
+      '(font-lock-builtin-face ((t (:foreground "#fe8019" ))))
+      '(font-lock-comment-face ((t (:foreground "#df7114" ))))
+      '(font-lock-function-name-face ((t (:foreground "#b8bb26" ))))
+      '(font-lock-keyword-face ((t (:foreground "#fb4934" ))))
+      '(font-lock-string-face ((t (:foreground "#b8bb26" ))))
+      '(font-lock-type-face ((t (:foreground "#d3869b" ))))
+      '(font-lock-constant-face ((t (:foreground "#d3869b" ))))
+      '(font-lock-variable-name-face ((t (:foreground "#83a598" ))))
+      '(minibuffer-prompt ((t (:foreground "#b8bb26" :bold t ))))
+      '(font-lock-warning-face ((t (:foreground "red" :bold t ))))
+      )
+   (provide-theme 'bba1)
+
+  (if (display-graphic-p)
+      (custom-set-faces
+        '(org-block-begin-line ((t (:background "#29759c" :foreground "#84cbef"))) t)
+        '(org-block-end-line ((t (:inherit org-block-begin-line))) t)
+        )
+    )
 
 #+END_SRC