felix
/
slime
1
0
Atdalīts 0
Kods Problēmas 0 Izmaiņu pieprasījumi 0 Laidieni 0 Vikivietne Aktivitāte
Nevar pievienot vairāk kā 25 tēmas Tēmai ir jāsākas ar burtu vai ciparu, tā var saturēt domu zīmes ('-') un var būt līdz 35 simboliem gara.
12 Revīzijas
1 Atzars
21 MiB
 
 
 
 
 
 
Koks: 1ea4cf5213
Atzari Tagi
${ item.name }
Izveidot atzaru ${ searchTerm }
no '1ea4cf5213'
${ noResults }
slime/.dir-locals.el

37 rindas
1.9 KiB
Neapstrādāts Vainot Vēsture 

  1. ((c-mode . ((eval . (company-clang-set-prefix "main.c"))

  2.             (eval . (flycheck-mode 0))

  3.             (eval . (rainbow-mode 0))))

  4.  (nil . ((eval . (progn

  5.                    (defvar context-mode-map (make-sparse-keymap)

  6.                      "Keymap while context-mode is active.")

  7.                    (define-minor-mode context-mode

  8.                      "A temporary minor mode to be activated only specific to a buffer."

  9.                      nil

  10.                      :lighter " Context"

  11.                      context-mode-map)

  12.                    (context-mode 1)

  13. 

  14.                    ;; additional scripts

  15.                    (defun save-and-find-test-script-and-compile ()

  16.                      (interactive)

  17.                      (let ((build-script-name "test.bat"))

  18.                        (save-and-find-build-script-and-compile)))

  19.                    (defun save-and-find-run-script-and-compile ()

  20.                      (interactive)

  21.                      (let ((build-script-name "run.bat"))

  22.                        (save-and-find-build-script-and-compile)))

  23.                    (defun save-and-find-debug-script-and-compile ()

  24.                      (interactive)

  25.                      (let ((build-script-name "debug.bat"))

  26.                        (save-and-find-build-script-and-compile)))

  27. 

  28.                    (defhydra hydra-context (context-mode-map "<f2>")

  29.                      "Context Actions:"

  30.                      ("b" save-and-find-build-script-and-compile "build" :color blue)

  31.                      ("r" save-and-find-run-script-and-compile   "run"   :color blue)

  32.                      ("d" save-and-find-debug-script-and-compile "debug" :color blue)

  33.                      ("t" save-and-find-test-script-and-compile  "test"  :color blue)

  34.                      ("q" nil                                    "quit"  :color blue))

  35.                    (define-key context-mode-map (kbd "<f2>") 'hydra-context/body)

  36.                    )))))