added folds

kanata.kbd

@@ -1,20 +1,6 @@
-#|
-This minimal config changes Caps Lock to act as Caps Lock on quick tap, but
-if held, it will act as Left Ctrl. It also changes the backtick/grave key to
-act as backtick/grave on quick tap, but change ijkl keys to arrow keys on hold.
+#| vim:foldmethod=marker
 
-This text between the two pipe+octothorpe sequences is a multi-line comment.
-|#
-
-;; Text after double-semicolons are single-line comments.
-
-#|
-One defcfg entry may be added, which is used for configuration key-pairs. These
-configurations change kanata's behaviour at a more global level than the other
-configuration entries.
-|#
-
-(defcfg
+(defcfg ;;{{{1
   #|
   This configuration will process all keys pressed inside of kanata, even if
   they are not mapped in defsrc. This is so that certain actions can activate
@@ -26,7 +12,7 @@ configuration entries.
   process-unmapped-keys yes
 )
 
-(defsrc
+(defsrc ;;{{{1
   grv  1    2    3    4    5    6    7    8    9    0    -    =    bspc
   tab  q    w    e    r    t    y    u    i    o    p    [    ]    \
   caps a    s    d    f    g    h    j    k    l    ;    '    ret
@@ -34,7 +20,7 @@ configuration entries.
   lctl lmet lalt           spc            ralt rmet rctl
 )
 
-(deflayer default
+(deflayer default ;;{{{1
   grv  1    2    3    4    5    6    7    8    9    0    -    =    bspc
   tab  q    w    e    r    t    y    u    i    o    p    [    ]    \
   @cap a    s    d    f    g    h    j    k    l    ;    '    ret
@@ -42,7 +28,7 @@ configuration entries.
   lctl lmet lalt         @shsp            ralt rmet rctl
 )
 
-(deflayer symbols
+(deflayer symbols ;;{{{1
   grv  1    2    3    4    5    6    7    8    9    0    -    =    bspc
   tab  @`  @m[  @m]  @&   @|   @^   @_   @m-  @+   @m=   [    ]    lrld
   @cap @~  @bl  @br  @*   @m\  bspc ret   /   tab   ;    '    ret
@@ -50,7 +36,7 @@ configuration entries.
   lctl lmet lalt         @shsp            ralt rmet rctl
 )
 
-(defalias
+(defalias ;;{{{1
   cap (tap-hold-press 0 200 esc lctl)
   shsp (tap-hold-press 0 200 spc lsft)
   zl (tap-hold-press 0 200 z (layer-while-held symbols))