multi-nested langage test md and org files

to have a sample for playing with nested code language behavior in
markdown and org mode with various languages

git/.gitconfig

@@ -13,10 +13,13 @@
 	last = cat-file commit HEAD
 [branch]
   autoSetupRebase = always
+[checkout]
+  defaultRemote = origin
 [merge]
   ff = only
 [push]
   autoSetupRemote = true
+  default = upstream
 [rerere]
 	enabled = true
 [remote]

nvim/.config/nvim/fnl/dotfiles/plugin/lspconfig.fnl

@@ -125,7 +125,7 @@
       (print "LSP Client Attached."))
 
 (when-let [lspi (require :nvim-lsp-installer)]
-          (let [capabilities (cmp_nvim_lsp.update_capabilities (lsp.protocol.make_client_capabilities))]
+          (let [capabilities (cmp_nvim_lsp.default_capabilities (lsp.protocol.make_client_capabilities))]
             (defn lsp-execute-command [cmd ...]
                   (let [buf-uri (vim.uri_from_bufnr 0)
                         cursor (vim.api.nvim_win_get_cursor 0)

nvim/.config/nvim/fnl/dotfiles/plugin/paredit.fnl

@@ -11,6 +11,14 @@
 
 (defn bool->int [bool] (if bool 1 0))
 
+(defn int->bool [x] (if (= 0 x) false true))
+
+(defn toggle-global! [x] (->> (a.get nvim.g x)
+                              (int->bool)
+                              (not)
+                              (bool->int)
+                              (tset nvim.g x)))
+
 (defn language-at-cursor [] (let [parser (ts-parsers.get_parser)
                                   current-node (ts-utils.get_node_at_cursor)
                                   range (if current-node [(current-node:range)])
@@ -53,9 +61,27 @@
 ; (nvim.del_augroup_by_name "BabeliteParedit")
 ; (nvim.get_autocmds {:group "BabeliteParedit"})
 
-; (let [group (nvim.create_augroup "BabeliteParedit" {:clear true})]
+;;(let [group (nvim.create_augroup :BabeliteParedit {:clear true})]
-;   (nvim.create_autocmd ["CursorHold" "CursorMoved"]
+;;  (nvim.create_autocmd [:CursorHold :CursorMoved]
-;                        {:group group
+;;                       {: group
-;                         ;:pattern ["*.org" "*.md"]
+;;                        ;:pattern ["*.org" "*.md"]
-;                         :callback TreeSitterLangParedit}))
+;;                        :callback TreeSitterLangParedit}))
-; 
+;;
+
+;; (defn paredit-toggle! [] (toggle-global :paredit_mode)
+;;       (nvim.fn.PareditInitBuffer)
+;; nvim.g.paredit_mode
+;;       )
+;; 
+;; \
+;; (int->bool 0)
+;; (defn test [x] (a.get nvim.g x))
+;; 
+;; (test :pareditmode)
+;; (a.get nvim.g :paredit_mode)
+;; (comment ;
+;;   nvim.g.paredit_mode
+;;   ;
+;; 
+;;   (paredit-toggle!)
+;;   )

nvim/.config/nvim/fnl/dotfiles/terraform-helpers.fnl

@@ -0,0 +1,22 @@
+(module dotfiles.terraform-helpers
+        {autoload {a aniseed.core}
+         require {anenv aniseed.env
+                  nvim aniseed.nvim
+                  nu aniseed.nvim.util
+                  u dotfiles.util}})
+
+(defn append-to-buf [bufno lines]
+      (when lines
+        (nvim.buf_set_lines buffno -1 -1 false lines)))
+
+(var tf-log-bufno nil)
+(defn tf-log-buffer [])
+
+(defn terraform-import []
+      (vim.fn.jobstart [:terraform :import :-no-color address id]
+                       {:stdout_buffered true
+                        :on_stdout (fn [_ data]
+                                     (append-to-buf bufno data))}))
+
+; (nu.fn-bridge :ZoomToggle :dotfiles.zoom-toggle :zoom-toggle {:return false})
+; (u.nnoremap :<C-W>z ":call ZoomToggle()<CR>")

test.md

@@ -0,0 +1,21 @@
+# Some heading
+
+```fennel
+(print)
+  (* 21
+   (+ 1 3))
+```
+
+some clojure
+
+```clojure
+(print
+ )(* 21
+  (+ 1 3))
+```
+
+some python
+
+```python
+print( 1 + 3 ) + 3
+```

test.org

@@ -0,0 +1,50 @@
+* test
+** test level 2
+*** test level 3
+**** test level 4
+***** test level 5
+****** test level 6
+******* test level 7
+******** test level 8
+********* test level 9
+********** test level 10
+
+* test 3
+* test 4
+
+  #+NAME: x
+  3
+
+- [ ] something
+- [X] something else 
+- [-] half done  ∂
+
+Some fennel
+
+#+begin_example ex1
+dfs
+#+end_example
+
+#+name: random
+#+begin_src fennel
+(print )
+(+ 1 (* 3 7))
+#+end_src
+
+#+results:
+
+Some Clojure
+
+#+begin_src clojure
+(println (* 3 )(+ 1 2) )
+#+end_src
+
+#+begin_src python :results silent :exports code :var n=0
+print(1 + 3)
+#+end_src
+
+
+#+begin_src
+print(+ 1 3)
+#+end_src
+

tmux.conf

@@ -8,6 +8,8 @@ set -s escape-time 1
 set -g base-index 1
 setw -g pane-base-index 1
 
+set -g main-pane-width 160
+
 bind r source-file ~/.tmux.conf \; display "Reloaded!"
 bind -r '`' clear-history \; display "History Cleared!"