libkookie: add org-mode insert source block function

infra/libkookie/overlays/kookie/emacs/org/default.el

@@ -28,9 +28,12 @@
                               ))
     (org-open-at-point)))
 
-(defun org-insert-block ()
-  "Insert a matching set of blocks statements"
-  (interactive))
+(defun org-insert-source-block ()
+  "Insert a source code block"
+  (interactive)
+  (insert (concat "#+BEGIN_SRC " (read-string "Enter the source language: ")))
+  (insert "\n\n#+END_SRC") (indent-according-to-mode)
+  (previous-line 1) (indent-according-to-mode))
 
 ;;; Org mode key bindings replicated here to make it easier for me
 (define-key org-mode-map "\C-c\C-o" 'org-open-at-point-in-current-window)