From b4d972d61854fbd051973b4a567cc6d7c19a6b44 Mon Sep 17 00:00:00 2001
From: Levi Neely <141506390+lneely@users.noreply.github.com>
Date: Sat, 14 Sep 2024 00:13:05 +0200
Subject: [PATCH] sshfs instead of tramp

---
 emacs/init.el | 24 +++++++++++++++++++-----
 1 file changed, 19 insertions(+), 5 deletions(-)

diff --git a/emacs/init.el b/emacs/init.el
index 9540317..9a40193 100644
--- a/emacs/init.el
+++ b/emacs/init.el
@@ -47,7 +47,7 @@
 (defun my/visit-todo ()
   "Visit TODO.org in home."
   (interactive)
-  (find-file "/ssh:lkn@alioth.uberspace.de:/home/lkn/TODO.org"))
+  (find-file "~/alioth/TODO.org"))
 
 (defun my/reload-init-file ()
   "Reload the Emacs init file."
@@ -130,7 +130,7 @@
   (defvar org-refile-allow-creating-parent-nodes)
   (setq org-refile-targets
         '((nil :maxlevel . 9)
-          ("/ssh:lkn@alioth.uberspace.de:/home/lkn/TODO.org" :maxlevel . 9))
+          ("~/alioth/lkn/TODO.org" :maxlevel . 9))
         org-refile-use-outline-path 'file
         org-outline-path-complete-in-steps nil
         org-refile-allow-creating-parent-nodes 'confirm))
@@ -138,7 +138,7 @@
 (defun my/org-capture-config ()
   "Setup org-capture."
   (setq org-capture-templates
-        '(("t" "TODO" entry (file "/ssh:lkn@alioth.uberspace.de:/home/lkn/TODO.org")
+        '(("t" "TODO" entry (file "~/alioth/TODO.org")
            "* TODO %?\n  %i" :prepend t)))
   (with-eval-after-load 'denote
     (defvar denote-org-capture-specifiers)
@@ -277,7 +277,7 @@
     (interactive)
     (unless org-agenda-files
       (setq org-agenda-files
-            (list "/ssh:lkn@alioth.uberspace.de:/home/lkn/TODO.org"))))
+            (list "~/alioth/TODO.org"))))
   
   (advice-add 'org-agenda :before #'my/add-remote-todo-file)
   (org-babel-do-load-languages 'org-babel-load-languages
@@ -311,7 +311,7 @@
   :config
 
   (defvar my/denote-local-notes-directory "~/notes/")
-  (defvar my/denote-remote-notes-directory "/ssh:lkn@alioth.uberspace.de:/home/lkn/notes/")
+  (defvar my/denote-remote-notes-directory "~/alioth/notes/")
   (setq denote-directory my/denote-local-notes-directory)
 
   (defun my/denote-echo-current-directory ()
@@ -485,6 +485,7 @@
 (use-package python-mode :ensure t :defer t
   :mode (("BUILD\\'" . python-mode) ;; please BUILD config
          ("\\.py$" . python-mode)))
+(use-package python-environment :ensure t)
 (use-package mmm-mode :ensure t :defer t)
 (use-package multi-web-mode :ensure t :defer t)
 (use-package protobuf-mode :ensure t :defer t)
@@ -1015,6 +1016,19 @@
 
 (global-set-key (kbd "C-x E t") 'generate-tags-for-directory)
 
+(defun mount-alioth-sshfs ()
+  "Mount Alioth Uberspace using SSHFS."
+  (interactive)
+  (let ((default-directory "~"))
+    (shell-command "sshfs lkn@alioth.uberspace.de:/home/lkn/ ~/alioth")))
+
+(defun umount-alioth-sshfs ()
+  "Unmount Alioth Uberspace using SSHFS."
+  (interactive)
+  (let ((default-directory "~"))
+    (shell-command "umount ~/alioth")))
+
+
 (provide 'init)
 
 ;; Local Variables: