lkn
/
syscfg
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

sshfs instead of tramp

This commit is contained in:
Levi Neely 2024-09-14 00:13:05 +02:00
parent 939e73362b
commit b4d972d618
1 changed files with 19 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

24
emacs/init.el
View File

@ -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: