Checkpoint

config.el

@@ -25,6 +25,7 @@
 ;; There are two ways to load a theme. Both assume the theme is installed and
 ;; available. You can either set `doom-theme' or manually load a theme with the
 ;; `load-theme' function. This is the default:
+(setq doom-font (font-spec :family "Fira Code" :size 12))
 (setq doom-theme 'doom-solarized-light)
 
 ;; If you use `org' and don't want your org files in the default location below,
@@ -55,6 +56,7 @@
 
 (setq +mu4e-backend 'offlineimap)
 
+(setf lexical-binding t)
 (defun kuba/generate-mu4-context (key_ category_ name_ addresses_ fullname_ smtp-server_ smtp-port_ smtp-user_ smtp-stream-type_ inbox-prefix_)
   "NAME is the name in offlineimap directory"
   (let (
@@ -82,26 +84,30 @@
 	       `(user-mail-address     . ,(car addresses))
 	       `(user-full-name         . ,fullname)
 	       `(mu4e-compose-signature . ,fullname)
+               `(org-msg-signature . ,(concat "#+begin_signature
+--
+" fullname " \\\\
+#+end_signature"))
 	       `(mu4e-drafts-folder     . ,(concat "/" name "/" inbox-prefix "Drafts"))
 	       `(mu4e-sent-folder       . ,(concat "/" name "/" inbox-prefix "Sent"))
 	       `(mu4e-trash-folder      . ,(concat "/" name "/" inbox-prefix "Trash"))
 	       `(mu4e-refile-folder     . ,(lambda (msg)
-					   (or
+	        			   (or
-					    (some
+	        			    (some
-					      'identity
+	        			      'identity
-					      (mapcar (lambda (addr)
+	        			      (mapcar (lambda (addr)
-						       (cond
+	        				       (cond
-							((mu4e-message-contact-field-matches msg :to addr) (concat "/" name "/" inbox-prefix "Archives"))
+	        					((mu4e-message-contact-field-matches msg :to addr) (concat "/" name "/" inbox-prefix "Archives"))
-							((mu4e-message-contact-field-matches msg :from addr) (concat "/" name "/" inbox-prefix "Sent"))
+	        					((mu4e-message-contact-field-matches msg :from addr) (concat "/" name "/" inbox-prefix "Sent"))
-							(t nil)
+	        					(t nil)
-							)
+	        					)
-						       )
+	        				       )
-						      addresses
+	        				      addresses
-						      )
+	        				      )
-					      )
+	        			      )
-					      (concat "/" name "/" inbox-prefix "Archives")
+	        			      (concat "/" name "/" inbox-prefix "Archives")
-					    )
+	        			    )
-					   ))
+	        			   ))
 		`(smtpmail-smtp-server .  ,smtp-server)
 		`(smtpmail-smtp-service . ,smtp-port)
 		`(smtpmail-smtp-user . ,smtp-user)
@@ -114,7 +120,7 @@
 (defun kuba/setup-mu4e-accounts (deflist)
   (setq mu4e-contexts (mapcar (lambda (def) (apply 'kuba/generate-mu4-context def)) deflist))
   (setq mu4e-user-mail-address-list (apply 'append (mapcar (lambda (def) (nth 3 def)) deflist)))
-  (push (list (mapconcat 'identity  (mapcar (lambda (def) (concat "maildir:/" (nth 2 def) "/INBOX")) deflist) " OR ") "Merged inbox" 109) mu4e-bookmarks)
+  (push (list (concat  "(" (mapconcat 'identity  (mapcar (lambda (def) (concat "maildir:/" (nth 2 def) "/INBOX")) deflist) " OR ") ") and not maildir:/kontakt@jakub/INBOX") "Merged inbox" 109) mu4e-bookmarks)
   (-each
 	(seq-group-by (lambda (def) (nth 1 def)) deflist)
 	(lambda (defgroup) (push (list (mapconcat 'identity (mapcar (lambda (def) (concat "maildir:/" (nth 2 def) "/INBOX")) (-slice defgroup 1))  " OR ") (nth 0 defgroup) (aref (nth 0 defgroup) 0)) mu4e-bookmarks))
@@ -140,6 +146,12 @@
 )
 
 
+(after! mu4e
+  (setq mu4e-update-interval 20)
+  (mu4e-alert-enable-mode-line-display)
+  (setq mu4e-alert-interesting-mail-query (concat (mu4e-get-bookmark-query ?m) " and flag:unread"))
+)
+
 ;; to fix the highlight in mu4e disappearing (https://github.com/hlissner/emacs-doom-themes/issues/504):
 
 (after! hl-line
@@ -158,7 +170,7 @@
    (org-save-all-org-buffers)
    (message "downloading inbox...")
 ;;   (org-mobile-pull)
-   (shell-command "/home/kuba/scripts/inbox-download.sh")
+   (shell-command "/home/kuba/bin/inbox-download.sh")
 ;;   (org-mobile-push)
    (shell-command "notify-send \"org-sync finished\" --icon=ok")
    (find-file "~/org/inbox.org")
@@ -166,7 +178,7 @@
  )
 
 
-(map! :g "C-c m s" #'sync-org)
+(map! :g "C-c c m s" #'sync-org)
 
 (defun kuba/open-org-main ()
   (interactive)
@@ -190,6 +202,37 @@
 (map! :g "M-c" #'org-capture)
 
 
+(after! org
+  (setq org-capture-templates
+   '(("t" "Inbox item" entry
+      (file "~/org/inbox.org")
+      "* TODO %?
+CREATED: %U")
+     ("T" "Inbox item with Capture Target" entry
+      (file "~/org/inbox.org")
+      "* TODO %? (link)
+%a")
+     ("s" "test" entry
+      (file "~/org/inbox.org")
+      "* TODO %a %?")))
+  (setq org-agenda-start-day "-0d")
+  (setq org-hide-leading-stars nil)
+  (setq org-startup-indented nil)
+  (setq org-startup-folded t)
+  (setq org-refile-targets
+   (quote
+    (("/home/kuba/org/ideas.org" :maxlevel . 2)
+         ("/home/kuba/org/main.org" :level . 2)
+	 ("/home/kuba/org/main.org" :level . 3)
+	 ("/home/kuba/org/entertainment.org" :level . 1))))
+  (require 'org-mu4e)
+  (add-hook 'org-store-link-functions 'org-mu4e-store-link)
+  (add-hook 'org-capture-after-finalize-hook #'org-save-all-org-buffers)
+  (add-hook 'org-capture-after-refile-insert-hook #'org-save-all-org-buffers)
+  (add-hook 'org-after-todo-state-change-hook #'org-save-all-org-buffers)
+)
+
+
 
 ;;;;;;;;;;;;;;; spell-fu
 
@@ -201,21 +244,135 @@
     (spell-fu-mode 0)))
   )
 
+(defun lang-pl ()
+  (interactive)
+  (setq ispell-dictionary "pl_PL")
+  (setq langtool-default-language "pl-PL")
+  )
+
+(defun lang-en ()
+  (interactive)
+  (setq ispell-dictionary "en_US")
+  (setq langtool-default-language "en-US")
+)
+
+(map! :g "C-c t g" #'writegood-mode)
 
+(map! :g "C-c L c" #'langtool-check)
+(map! :g "C-c L d" #'langtool-check-done)
+(map! :g "C-c L l e" #'lang-en)
+(map! :g "C-c L l p" #'lang-pl)
 ;;;; popup
 
 
 ;;disable hiding modeline in popups
-(plist-put +popup-defaults :modeline t)
+;; (plist-put +popup-defaults :modeline t)
 
 ;;;;;;;;;;;;;;; prettier
 
-(after! prettier-js
+;; (after! prettier-js
-  (add-hook 'js2-mode-hook 'prettier-js-mode)
+;;   (add-hook 'js2-mode-hook 'prettier-js-mode)
-  (add-hook 'web-mode-hook 'prettier-js-mode)
+;;   (add-hook 'web-mode-hook 'prettier-js-mode)
-)
+;;   (add-hook 'typescript-mode-hook 'prettier-js-mode)
+;; )
 
 
 ;;;; file editing shortcuts
 
 (map! :g "C-a" #'move-beginning-of-line)
+(remove-hook 'doom-first-buffer-hook #'smartparens-global-mode)
+
+
+(after! flycheck
+  (setq! flycheck-check-syntax-automatically
+         (if (string= (system-name) "kuba-desktop")
+             '(save idle-change new-line mode-enabled idle-buffer-switch)
+             '(save mode-enabled idle-buffer-switch)
+           )))
+
+
+(setq +format-on-save-enabled-modes
+      '(mhtml-mode
+        html-mode
+        ;; typescript-mode
+        ;; js2-mode
+        ;; web-mode
+        ))
+
+;; (set-formatter! 'web-mode 'prettier-prettify)
+
+(add-hook 'after-init-hook #'global-prettier-mode)
+(add-hook 'web-mode-hook #'prettier-mode)
+(add-hook 'css-mode-hook #'prettier-mode)
+(add-hook 'typescript-mode-hook #'prettier-mode)
+
+(fset 'sm
+   (kmacro-lambda-form [return ?\C-s ?i ?d ?e ?n ?\C-e 134217794 ?\M-w ?\M-c ?T ?Z ?g ?ł ?o ?s ?z ?e ?n ?i ?e ?  ?# ?\C-y ?\C-c ?\C-w ?Z ?g ?ł ?o return ?r ?\M-: ?\( ?s ?l ?e ?e ?p ?- ?f ?o ?r ?  ?0 ?. ?1 ?\) return] 0 "%d"))
+
+
+;; (defun org-agenda-skip-if-scheduled-later ()
+;; "If this function returns nil, the current match should not be skipped.
+;; Otherwise, the function must return a position from where the search
+;; should be continued."
+;;   (ignore-errors
+;;     (let ((subtree-end (save-excursion (org-end-of-subtree t)))
+;;           (scheduled-seconds
+;;             (time-to-seconds
+;;               (org-time-string-to-time
+;;                 (org-entry-get nil "SCHEDULED"))))
+;;           (now (time-to-seconds (current-time))))
+;;        (and scheduled-seconds
+;;             (>= scheduled-seconds now)
+;;             subtree-end))))
+
+(defun mu4e-copy-message-at-point (&optional dir)
+  "Copy message at point to somewhere else as <date>_<subject>.eml."
+  (interactive)
+  (let* ((msg (mu4e-message-at-point))
+         (target (format "%s_%s.eml"
+                         (format-time-string "%F" (mu4e-message-field msg :date))
+                         (or (mu4e-message-field msg :subject) "No subject"))))
+    (copy-file
+     (mu4e-message-field msg :path)
+     (format "%s/%s" (or dir (read-directory-name "Copy message to: ")) target) 1)))
+
+
+(after!  lsp-mode
+  (message "after LSP!")
+  (setq! lsp-log-io nil)
+  (lsp-register-client
+      (make-lsp-client :new-connection (lsp-tramp-connection '("typescript-language-server" "--stdio"))
+                       :major-modes '(typescript-mode)
+                       :remote? t
+                       :server-id 'ts-remote))
+    (lsp-register-client
+      (make-lsp-client :new-connection (lsp-stdio-connection '("typescript-language-server" "--stdio"))
+                       :major-modes '(typescript-mode)
+                       :server-id 'ts-ls-better))
+
+    (setq company-idle-delay 0.5)
+;; (lsp-register-client
+;;     (make-lsp-client :new-connection (lsp-tramp-connection '("javascript-typescript-langserver"))
+;;                      :major-modes '(typescript-mode)
+;;                      :remote? t
+;;                      :server-id 'jsts-remote))
+)
+
+(defun remote-prettier ()
+    "Run prettier on a remote file"
+  (interactive)
+  (let ((filename buffer-file-name))
+        (shell-command (concat "prettier -w " (file-remote-p buffer-file-name 'localname)))
+        (kill-buffer (buffer-name))
+        (find-file filename)
+   )
+)
+
+(defun reopen-file ()
+  "kills the buffer and reopens the file"
+  (interactive)
+  (let ((filename buffer-file-name))
+        (kill-buffer (buffer-name))
+        (find-file filename)
+   )
+)

custom.el

@@ -3,6 +3,98 @@
  ;; If you edit it by hand, you could mess it up, so be careful.
  ;; Your init file should contain only one such instance.
  ;; If there is more than one, they won't work right.
+ '(ansi-color-faces-vector
+   [default default default italic underline success warning error])
+ '(ansi-color-names-vector
+   ["#FDF6E3" "#CC9393" "#7F9F7F" "#F0DFAF" "#8CD0D3" "#DC8CC3" "#93E0E3" "#DCDCDC"])
+ '(calendar-week-start-day 1)
+ '(counsel-projectile-switch-project-action
+   '(4
+     ("o" counsel-projectile-switch-project-action "jump to a project buffer or file")
+     ("f" counsel-projectile-switch-project-action-find-file "jump to a project file")
+     ("d" counsel-projectile-switch-project-action-find-dir "jump to a project directory")
+     ("D" counsel-projectile-switch-project-action-dired "open project in dired")
+     ("b" counsel-projectile-switch-project-action-switch-to-buffer "jump to a project buffer")
+     ("m" counsel-projectile-switch-project-action-find-file-manually "find file manually from project root")
+     ("S" counsel-projectile-switch-project-action-save-all-buffers "save all project buffers")
+     ("k" counsel-projectile-switch-project-action-kill-buffers "kill all project buffers")
+     ("K" counsel-projectile-switch-project-action-remove-known-project "remove project from known projects")
+     ("c" counsel-projectile-switch-project-action-compile "run project compilation command")
+     ("C" counsel-projectile-switch-project-action-configure "run project configure command")
+     ("E" counsel-projectile-switch-project-action-edit-dir-locals "edit project dir-locals")
+     ("v" counsel-projectile-switch-project-action-vc "open project in vc-dir / magit / monky")
+     ("sg" counsel-projectile-switch-project-action-grep "search project with grep")
+     ("si" counsel-projectile-switch-project-action-git-grep "search project with git grep")
+     ("ss" counsel-projectile-switch-project-action-ag "search project with ag")
+     ("sr" counsel-projectile-switch-project-action-rg "search project with rg")
+     ("xs" counsel-projectile-switch-project-action-run-shell "invoke shell from project root")
+     ("xe" counsel-projectile-switch-project-action-run-eshell "invoke eshell from project root")
+     ("xt" counsel-projectile-switch-project-action-run-term "invoke term from project root")
+     ("xv" counsel-projectile-switch-project-action-run-vterm "invoke vterm from project root")
+     ("Oc" counsel-projectile-switch-project-action-org-capture "capture into project")
+     ("Oa" counsel-projectile-switch-project-action-org-agenda "open project agenda")))
+ '(custom-safe-themes
+   '("2cdc13ef8c76a22daa0f46370011f54e79bae00d5736340a5ddfe656a767fddf" "93ed23c504b202cf96ee591138b0012c295338f38046a1f3c14522d4a64d7308" "4bca89c1004e24981c840d3a32755bf859a6910c65b829d9441814000cf6c3d0" "5d09b4ad5649fea40249dd937eaaa8f8a229db1cec9a1a0ef0de3ccf63523014" "711efe8b1233f2cf52f338fd7f15ce11c836d0b6240a18fffffc2cbd5bfe61b0" default))
+ '(doom-modeline-mu4e t)
+ '(fci-rule-color "#4F4F4F")
+ '(flycheck-html-tidy-executable "/usr/bin/tidy")
+ '(jdee-db-active-breakpoint-face-colors (cons "#000000" "#8CD0D3"))
+ '(jdee-db-requested-breakpoint-face-colors (cons "#000000" "#7F9F7F"))
+ '(jdee-db-spec-breakpoint-face-colors (cons "#000000" "#494949"))
+ '(mu4e-attachment-dir "/home/kuba/Downloads")
+ '(mu4e-completing-read-function 'ivy-completing-read)
+ '(mu4e-compose-context-policy 'ask-if-none)
+ '(mu4e-compose-format-flowed t)
+ '(mu4e-confirm-quit nil)
+ '(mu4e-context-policy 'pick-first)
+ '(mu4e-drafts-folder "/kontakt@kuba-orlik.name/Drafts")
+ '(mu4e-get-mail-command "offlineimap -o -q")
+ '(mu4e-headers-visible-columns 120)
+ '(mu4e-hide-index-messages t)
+ '(mu4e-refile-folder
+   '(closure
+     ((inbox-prefix . "")
+      (smtp-stream-type . starttls)
+      (smtp-user . "kuba")
+      (smtp-port . 587)
+      (smtp-server . "yuno.kuba-orlik.name")
+      (fullname . "Kuba Orlik")
+      (addresses "kontakt@kuba-orlik.name")
+      (name . "kontakt@kuba-orlik.name")
+      (category . "personal")
+      (key . "1")
+      (inbox-prefix_ . "")
+      (smtp-stream-type_ . starttls)
+      (smtp-user_ . "kuba")
+      (smtp-port_ . 587)
+      (smtp-server_ . "yuno.kuba-orlik.name")
+      (fullname_ . "Kuba Orlik")
+      (addresses_ "kontakt@kuba-orlik.name")
+      (name_ . "kontakt@kuba-orlik.name")
+      (category_ . "personal")
+      (key_ . "1")
+      t)
+     (msg)
+     (or
+      (some 'identity
+            (mapcar
+             #'(lambda
+                 (addr)
+                 (cond
+                  ((mu4e-message-contact-field-matches msg :to addr)
+                   (concat "/" name "/" inbox-prefix "Archives"))
+                  ((mu4e-message-contact-field-matches msg :from addr)
+                   (concat "/" name "/" inbox-prefix "Sent"))
+                  (t nil)))
+             addresses))
+      (concat "/" name "/" inbox-prefix "Archives"))))
+ '(mu4e-sent-folder "/kontakt@kuba-orlik.name/Sent")
+ '(mu4e-split-view 'vertical)
+ '(mu4e-trash-folder "/kontakt@kuba-orlik.name/Trash")
+ '(mu4e-update-interval 20)
+ '(mu4e-view-show-addresses t)
+ '(mu4e-view-show-images t)
+ '(objed-cursor-color "#CC9393")
  '(org-agenda-custom-commands
    '(("n" "Agenda and all TODOs"
       ((agenda "" nil)
@@ -11,8 +103,7 @@
      ("p" . "Personal context")
      ("pa" "Agenda + todo"
       ((agenda ""
-               ((org-agenda-span 'day)
+               ((org-agenda-span 'day)))
-                (org-agenda-category-filter-preset 'nil)))
        (alltodo "" nil))
       ((org-agenda-category-filter-preset
         '("-work")))
@@ -21,8 +112,7 @@
      ("w" . "Work context")
      ("wa" "Agenda + todo"
       ((agenda ""
-               ((org-agenda-span 'day)))
+               ((org-agenda-span 'day))))
-       (alltodo "" nil))
       nil nil)
      ("x" "Describe command here" alltodo ""
       ((org-agenda-files
@@ -41,17 +131,51 @@ CREATED: %U")
 %a")
      ("s" "test" entry
       (file "~/org/inbox.org")
-      "* TODO %a %?")) t)
+      "* TODO %a %?")))
+ '(org-clock-in-resume t)
+ '(org-clock-mode-line-total 'current)
+ '(org-clock-persist 'history)
  '(org-fontify-done-headline nil)
  '(org-fontify-quote-and-verse-blocks t)
  '(org-fontify-whole-heading-line t)
- '(org-modules '(org-bbdb org-docview org-gnus org-habit org-info))
+ '(org-modules '(org-habit))
  '(org-priority-lowest 70)
  '(org-refile-targets
    '(("/home/kuba/org/ideas.org" :maxlevel . 2)
      ("/home/kuba/org/main.org" :level . 2)
      ("/home/kuba/org/entertainment.org" :level . 1)))
- '(org-todo-keywords '((sequence "TODO" "DONE(!)" "HOLD"))))
+ '(org-todo-keywords '((sequence "TODO" "DONE(!)" "HOLD")))
+ '(package-selected-packages '(htmlize))
+ '(pdf-view-midnight-colors (cons "#DCDCDC" "#3F3F3F"))
+ '(projectile-auto-discover nil)
+ '(projectile-dynamic-mode-line nil)
+ '(projectile-enable-caching t)
+ '(projectile-git-submodule-command nil)
+ '(projectile-mode t nil (projectile))
+ '(rustic-ansi-faces
+   ["#3F3F3F" "#CC9393" "#7F9F7F" "#F0DFAF" "#8CD0D3" "#DC8CC3" "#93E0E3" "#DCDCDC"])
+ '(vc-annotate-background "#3F3F3F")
+ '(vc-annotate-color-map
+   (list
+    (cons 20 "#7F9F7F")
+    (cons 40 "#a4b48f")
+    (cons 60 "#cac99f")
+    (cons 80 "#F0DFAF")
+    (cons 100 "#eacfa4")
+    (cons 120 "#e4bf99")
+    (cons 140 "#DFAF8F")
+    (cons 160 "#dea3a0")
+    (cons 180 "#dd97b1")
+    (cons 200 "#DC8CC3")
+    (cons 220 "#d68eb3")
+    (cons 240 "#d190a3")
+    (cons 260 "#CC9393")
+    (cons 280 "#ab8080")
+    (cons 300 "#8a6d6d")
+    (cons 320 "#695b5b")
+    (cons 340 "#4F4F4F")
+    (cons 360 "#4F4F4F")))
+ '(vc-annotate-very-old-color nil))
 (custom-set-faces
  ;; custom-set-faces was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
@@ -64,3 +188,4 @@ CREATED: %U")
  '(mu4e-replied-face ((t (:inherit 'mu4e-header-face :slant italic))))
  '(mu4e-unread-face ((t (:inherit 'font-lock-keyword-face))))
  '(org-headline-done ((t (:inherit org-headline-todo)))))
+(put 'customize-themes 'disabled nil)

init.el

@@ -29,7 +29,7 @@
        ;;deft              ; notational velocity for Emacs
        doom              ; what makes DOOM look the way it does
        doom-dashboard    ; a nifty splash screen for Emacs
-       doom-quit         ; DOOM quit-message prompts when you quit Emacs
+        ;; doom-quit         ; DOOM quit-message prompts when you quit Emacs
        ;;fill-column       ; a `fill-column' indicator
        hl-todo           ; highlight TODO/FIXME/NOTE/DEPRECATED/HACK/REVIEW
        ;;hydra
@@ -40,9 +40,9 @@
        nav-flash         ; blink cursor line after big motions
        ;;neotree           ; a project drawer, like NERDTree for vim
        ophints           ; highlight the region an operation acts on
-       (popup +defaults)   ; tame sudden yet inevitable temporary windows
+       ;; (popup +defaults)   ; tame sudden yet inevitable temporary windows
        ;;tabs              ; a tab bar for Emacs
-       ;;treemacs          ; a project drawer, like neotree but cooler
+       treemacs          ; a project drawer, like neotree but cooler
        ;;unicode           ; extended unicode support for various languages
        vc-gutter         ; vcs diff in the fringe
        vi-tilde-fringe   ; fringe tildes to mark beyond EOB
@@ -54,10 +54,10 @@
        ;(evil +everywhere); come to the dark side, we have cookies
        file-templates    ; auto-snippets for empty files
        fold              ; (nigh) universal code folding
-       ;;(format +onsave)  ; automated prettiness
+       (format +onsave)  ; automated prettiness
        ;;god               ; run Emacs commands without modifier keys
        ;;lispy             ; vim for lisp, for people who don't like vim
-       ;;multiple-cursors  ; editing in many places at once
+       multiple-cursors  ; editing in many places at once
        ;;objed             ; text object editing for the innocent
        ;;parinfer          ; turn lisp into python, sort of
        ;;rotate-text       ; cycle region at point between text candidates
@@ -72,19 +72,19 @@
        vc                ; version-control and Emacs, sitting in a tree
 
        :term
-       ;;eshell            ; the elisp shell that works everywhere
+       eshell            ; the elisp shell that works everywhere
-       ;;shell             ; simple shell REPL for Emacs
+       shell             ; simple shell REPL for Emacs
        ;;term              ; basic terminal emulator for Emacs
        ;;vterm             ; the best terminal emulation in Emacs
 
        :checkers
        syntax            ; tasing you for every semicolon you forget
-       spell             ; tasing you for misspelling mispelling
+       ;(spell +flyspell) ; tasing you for misspelling mispelling
        grammar           ; tasing grammar mistake every you make
 
        :tools
        ;;ansible
-       ;;debugger          ; FIXME stepping through code, to help you add bugs
+       ;; debugger          ; FIXME stepping through code, to help you add bugs
        ;;direnv
        ;;docker
        ;;editorconfig      ; let someone else argue about tabs vs spaces
@@ -92,7 +92,7 @@
        (eval +overlay)     ; run code, run (also, repls)
        ;;gist              ; interacting with github gists
        lookup              ; navigate your code and its documentation
-       ;;lsp
+       lsp
        magit             ; a git porcelain for Emacs
        ;;make              ; run make tasks from Emacs
        ;;pass              ; password manager for nerds
@@ -133,7 +133,7 @@
        ;;idris             ;
        json              ; At least it ain't XML
        ;;(java +meghanada) ; the poster child for carpal tunnel syndrome
-       javascript        ; all(hope(abandon(ye(who(enter(here))))))
+       (javascript +lsp)        ; all(hope(abandon(ye(who(enter(here))))))
        ;;julia             ; a better, faster MATLAB
        ;;kotlin            ; a better, slicker Java(Script)
        ;;latex             ; writing papers in Emacs has never been so fun
@@ -164,7 +164,7 @@
        ;;solidity          ; do you need a blockchain? No.
        ;;swift             ; who asked for emoji variables?
        ;;terra             ; Earth and Moon in alignment for performance.
-       ;; web               ; the tubes
+       (web +lsp)               ; the tubes
        yaml              ; JSON, but readable
 
        :email
@@ -180,4 +180,4 @@
 
        :config
        ;;literate
-       (default +bindings +smartparens))
+       (default +bindings))

packages.el

@@ -49,4 +49,19 @@
 ;; ...Or *all* packages (NOT RECOMMENDED; will likely break things)
 ;(unpin! t)
 
-(package! prettier-js)
+;; (package! prettier-js)
+(package! mu4e-alert)
+(package! doom-themes
+  :recipe (:host github :repo "kuba-orlik/emacs-doom-themes"))
+(unpin! doom-themes)
+
+(package! pkgbuild-mode)
+(package! dockerfile-mode)
+(package! docker-compose-mode)
+(package! qml-mode)
+(package! ripgrep)
+(package! ag)
+(package! org-msg :pin "c19f54beebe268833c44a015861bf02531591011") ;; aby pozwolić na drag&drop
+(package! prettier)
+(package! lsp-treemacs)
+(package! nginx-mode)

snippets/typescript-mode/flora-html-template

@@ -0,0 +1,5 @@
+# -*- mode: snippet -*-
+# name: flora html template
+# key: html       
+# --
+html/* HTML */ \`$0\`