Updates after laptop change

Author: juan-leon

.bash/10-vars.sh

@@ -4,7 +4,7 @@ if test -f ~/.domainname; then
     EMAIL="juanleon.lahoz@$(cat ~/.domainname)"
 fi
 
-PATH=/home/juanleon/bin:/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin:/home/juanleon/.local/bin
+PATH=/home/juanleon/bin:/snap/bin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin:/home/juanleon/.local/bin:/usr/local/go/bin/
 GREP_COLORS="ms=01;31:mc=01;31:sl=:cx=34:fn=35:ln=32:bn=32:se=36"
 
 if test -e /usr/share/virtualenvwrapper/virtualenvwrapper.sh; then
@@ -19,5 +19,6 @@ export DEBEMAIL=$EMAIL
 export MANPAGER="sh -c 'col -bx | bat -l man -p'"
 # eval $(ssh-agent)
 
-export PEX_ROOT=/home/plain/pex
+export PEX_ROOT=/home/juanleon/.cache/pex
 export TS_WORK_ON_ALL_REPOS=true
+export NODE_OPTIONS=--no-experimental-fetch

.emacs.d/init-loader/05-customize.el

@@ -35,6 +35,9 @@
            (name 30 -1)
            " " filename)))
  '(jedi:tooltip-method nil)
+ '(lsp-file-watch-ignored-directories
+   '("[/\\\\]\\.git\\'" "[/\\\\]\\.github\\'" "[/\\\\]\\.circleci\\'" "[/\\\\]\\.hg\\'" "[/\\\\]\\.bzr\\'" "[/\\\\]_darcs\\'" "[/\\\\]\\.svn\\'" "[/\\\\]_FOSSIL_\\'" "[/\\\\]\\.idea\\'" "[/\\\\]\\.ensime_cache\\'" "[/\\\\]\\.eunit\\'" "[/\\\\]node_modules" "[/\\\\]\\.yarn\\'" "[/\\\\]\\.fslckout\\'" "[/\\\\]\\.tox\\'" "[/\\\\]dist\\'" "[/\\\\]dist-newstyle\\'" "[/\\\\]\\.stack-work\\'" "[/\\\\]\\.bloop\\'" "[/\\\\]\\.metals\\'" "[/\\\\]target\\'" "[/\\\\]\\.ccls-cache\\'" "[/\\\\]\\.vscode\\'" "[/\\\\]\\.venv\\'" "[/\\\\]\\.mypy_cache\\'" "[/\\\\]\\.deps\\'" "[/\\\\]build-aux\\'" "[/\\\\]autom4te.cache\\'" "[/\\\\]\\.reference\\'" "bazel-[^/\\\\]+\\'" "[/\\\\]\\.meta\\'" "[/\\\\]Library\\'" "[/\\\\]\\.lsp\\'" "[/\\\\]\\.clj-kondo\\'" "[/\\\\]\\.shadow-cljs\\'" "[/\\\\]\\.babel_cache\\'" "[/\\\\]\\.cpcache\\'" "[/\\\\]\\checkouts\\'" "[/\\\\]\\.gradle\\'" "[/\\\\]\\.m2\\'" "[/\\\\]bin/Debug\\'" "[/\\\\]obj\\'" "[/\\\\]_opam\\'" "[/\\\\]\\.cache\\'" "[/\\\\]\\.elixir_ls\\'" "[/\\\\]\\.direnv\\'"))
+ '(lsp-pyls-plugins-flake8-config "/home/juanleon/.flake8")
  '(magit-log-arguments '("-n48"))
  '(magit-push-arguments nil)
  '(magit-rebase-arguments '("--keep-empty" "--autosquash"))
@@ -81,4 +84,4 @@
  '(git-timemachine-minibuffer-detail-face ((t (:foreground "deep sky blue"))))
  '(org-agenda-date-weekend ((t (:inherit org-agenda-date :foreground "dark gray"))))
  '(org-journal-dir "~/Dropbox/org/journal/")
- '(stripe-highlight ((t (:background "#e4e4d4")))))
+ '(stripe-highlight ((t (:background "#e4e4d4"))) t))

.emacs.d/init-loader/15-preferences.el

@@ -2,7 +2,6 @@
 (mapc (lambda (mode) (funcall mode 1))
       '(column-number-mode auto-image-file-mode show-paren-mode size-indication-mode))
 
-
 (fset 'yes-or-no-p 'y-or-n-p)
 
 (setq-default

.emacs.d/init-loader/25-org.el

@@ -88,6 +88,7 @@
           ("l" "Today I learned" entry (file+datetree "info/til.org") "* %<%R:> %?")
           ("k" "Trick " entry (file "info/tricks.org") "* %?\n")
           ("K" "Trick with code" entry (file "info/tricks.org") "* %? \n#+BEGIN_SRC %^{language}\n\n#+END_SRC")
+          ("E" "Eleo" entry (file "agenda/Kids.org") "* TODO %? \n  %U\n")
           ("f" "Follow up" entry (file "agenda/agenda.org")
            "* TODO Follow up %?\n  SCHEDULED: %(org-insert-time-stamp (org-read-date nil t \"+3d\"))")
           ("s" "scheduled" entry (file "agenda/agenda.org")
@@ -101,6 +102,8 @@
             (tags "PRIORITY=\"C\"" ((org-agenda-overriding-header "Reviewed this weekly:")))
             (tags "PRIORITY=\"D\"" ((org-agenda-overriding-header "To be classified:"))))
            ((org-agenda-files '("~/Dropbox/org/agenda/Inbox.org"))))
+          ("E" "Interesting stuff to check out" ((alltodo ""))
+           ((org-agenda-files '("~/Dropbox/org/agenda/Kids.org"))))
           ("p" "Projects"
            ((todo "TODO"
                        ((org-agenda-overriding-header "Ongoing projects:"))))

.emacs.d/init-loader/35-git.el

@@ -45,7 +45,8 @@
 
 
 (use-package magit
-  :bind (([(super ?0)] . magit-status))
+  :bind (([(super ?0)] . magit-status)
+         ([(control ?\))] . magit-status))
   :commands magit-git-repo-p magit-status
   :ensure t
   :init
@@ -116,7 +117,7 @@
 
     (defun juanleon/assign-mr ()
       (interactive)
-      (insert "\n/assign juanleon.lahoz\n/reviewer"))
+      (insert "\n/assign susana.ledesma\n/reviewer quimey.vivas"))
 
     (add-hook 'forge-post-mode-hook (lambda ()
                                       (local-set-key [(super ?a)] 'juanleon/assign-mr))))

.emacs.d/init-loader/45-editing.el

@@ -9,7 +9,8 @@
 
 (use-package expand-region
   :ensure t
-  :bind (([(super ?1)] . er/expand-region)))
+  :bind (([(super ?1)] . er/expand-region)
+         ([(super ?e)] . er/expand-region)))
 
 
 (use-package easy-kill

.emacs.d/init-loader/50-prog.el

@@ -43,6 +43,7 @@
   (add-hook 'text-mode-hook #'ws-butler-mode)
   ;; Why are those below not inheriting from prog-mode?
   (add-hook 'toml-mode-hook #'ws-butler-mode)
+  (add-hook 'svelte-mode-hook #'delete-trailing-whitespace)
   (add-hook 'protobuf-mode-hook #'ws-butler-mode)
   :config
   (setq ws-butler-global-exempt-modes nil))
@@ -128,6 +129,11 @@
   ;; Monkey patch function to avoid buffer modified file flag bug
   (defun php-syntax-propertize-function (start end) nil))
 
+;; (use-package svelte-mode
+;;   :ensure t
+;;   :defer t
+;;   :mode ("\\.svelte\\'" . svelte-mode)
+;;   :hook ((svelte-mode . prog-mode)))
 
 (use-package json-mode
   :mode ("\\.js\\.template\\'" . json-mode))
@@ -183,6 +189,7 @@
   :init
   (setq lsp-keymap-prefix "s-l")
   :hook ((go-mode . lsp)
+         (rustic-mode . lsp)
          (lsp-mode . lsp-enable-which-key-integration))
   :commands lsp)
 
@@ -204,6 +211,7 @@
 
 (use-package rustic
   :ensure t
+  :mode ("\\.rs\\'" . rustic-mode)
   :bind (:map rustic-mode-map
               ("M-j" . lsp-ui-imenu)
               ("M-?" . lsp-find-references)

.emacs.d/init-loader/unused.el

@@ -2,17 +2,20 @@
 ;; using, or things I do not use anymore but I do not discard using again, since
 ;; future is opaque.
 
-
+;; Rarely used; not worth the key binding
 (use-package locate
   :defer t
   :bind (([(super l)] . locate)
          ([(super L)] . locate-with-filter)))
 
 
+;; rg is enough (projectile-ripgrep and deadgrep cover all my needs)
 (use-package ag
   :ensure t
   :commands ag ag-regexp)
 
+
+;; Going the lsp way for python too
 (use-package jedi
   :disabled
   :ensure t
@@ -23,15 +26,7 @@
         '("virtualenv" "-p" "python3.7" "--system-site-packages" "--quiet")))
 
 
-
-; Part of projectile now
-(use-package projectile-ripgrep
-  :ensure t
-  :after projectile)
-
-
 ;; load-theme-buffer-local is not polished enough to be worth using it
-
 (add-hook 'inferior-python-mode-hook
           (lambda nil
             (load-theme-buffer-local 'tango-dark (current-buffer))))
@@ -43,7 +38,6 @@
             (load-theme-buffer-local 'tango-dark (current-buffer))))
 
 
-
 ;; This is nice, and I leave here as example, but always end using
 ;; 'dired-at-other-repo
 
@@ -53,36 +47,9 @@
 (require 'popwin)
 (require 'button)
 (popwin-mode 1)
-(setq git-repositories
-      (list
-       "~/www/debhelpers"
-       "~/www/githooktools"
-       "~/www/iats/code"
-       "~/www/iatsadmin"
-       "~/www/iatsgithooks"
-       "~/www/iatsreqs"
-       "~/www/iatstesttools"
-       "~/www/iatstools"
-       "~/www/mergequeue"
-       "~/www/sibyl"
-       "~/www/squealer"
-       "~/www/vagrant"
-       "~/repos/git"
-       )
-      )
-
-(defun select-git-repository-from-list()
-  (interactive)
-  (with-output-to-temp-buffer "*git-repositories*"
-    (with-current-buffer "*git-repositories*"
-      (dolist (repo git-repositories)
-        (insert-text-button repo 'action `(lambda (x) (delete-window) (magit-status ,repo)))
-        (newline)))))
-(global-set-key (kbd "C-c \\") 'select-git-repository-from-list)
 
 
 ;; Useful, but I am using projectile for most of the stuff I need tags for.
-
 (defun recreate-tags()
   (interactive)
   (projectile-with-default-dir (projectile-project-root)
@@ -92,7 +59,6 @@
 
 
 ;; I am not using gdb nowadays
-
 (global-set-key [(f12)] 'gdb)
 (eval-after-load "gdb-mi"
   '(progn
@@ -127,9 +93,6 @@
 
 
 ;; I am not using java/maven nowadays
-
-
-
 (global-set-key [(meta f5)]
                 (command (java-compile "pom.xml" "mvn clean install")))
 (global-set-key [(meta f6)]
@@ -139,6 +102,7 @@
 (global-set-key [(meta f8)]
                 (command (java-compile "build.xml" "ant undeploy ; mvn install && ant deploy")))
 
+
 ;; Remove maven false positives
 (add-hook 'compilation-mode-hook
           (lambda ()
@@ -151,7 +115,7 @@
                             compilation-message nil help-echo nil mouse-face nil) t)))
                'append)))
 
-
+;; ??? This looks for inserting vars into golang based binaries at compile time
 (add-hook 'compilation-mode-hook
           (lambda ()
             (font-lock-add-keywords nil
@@ -161,7 +125,6 @@
                'append)))
 
 
-
 ;; This is fixed, but my faith on PHP mode is not great
 (eval-after-load "php-mode"
   '(progn
@@ -304,9 +267,7 @@
   (start-process "zeal" nil "zeal" "--query" (concat lang ":" symbol)))
 
 
-
 ;; I rarely used that anymore, replace bindings by move-line
-
 (global-set-key [(super up)]                'prev-function-name-face)
 (global-set-key [(super down)]              'next-function-name-face)
 
@@ -353,7 +314,6 @@
 
 
 ;; packages disabled for a long timer
-
 (use-package ctags
   :ensure t
   :disabled
@@ -562,7 +522,8 @@
   (autoload 'sdcv-search "sdcv")
   :bind ([(control c) ?d] . sdcv-search))
 
-;; Thunderlink is not working well
+
+;; Thunderlink is not working well :-(
 (defun juanleon/open-mail-at-point ()
   (interactive)
   (let ((link (thing-at-point 'line)))