Add services to automount OneDrive (via rclone)

Use global-visual-line-mode but disable in certain modes (org,
org-agenda, mu4e main and headers)

system/Tone.nix

@@ -1,15 +1,61 @@
-{ pkgs, username, ... }:
+{
+  pkgs,
+  username,
+  ...
+}:
 {
   imports = [
     ./desktop.nix
     ./work.nix
   ];
-  home-manager.users.${username} = {
+  home-manager.users.${username} =
-    home.stateVersion = "23.05";
+    { config, ... }:
-    wayland.windowManager.hyprland.settings.monitor = [
+    {
-      "desc:Dell Inc. DELL P3223QE CCG8YN3,preferred,auto,1.5"
+      home.stateVersion = "23.05";
-    ];
+      wayland.windowManager.hyprland.settings.monitor = [
-  };
+        "desc:Dell Inc. DELL P3223QE CCG8YN3,preferred,auto,1.5"
+      ];
+      systemd.user.services =
+        let
+          inherit (config.xdg) configHome;
+        in
+        {
+          mount-documents =
+            let
+              target = "${config.home.homeDirectory}/OneDrive";
+            in
+            {
+              Unit = {
+                Description = "Mount OneDrive to local directory";
+                After = [ "network-online.target" ];
+              };
+              Service = {
+                Type = "notify";
+                ExecStartPre = "/usr/bin/env mkdir -p ${target}";
+                ExecStart = "${pkgs.rclone}/bin/rclone --config=${configHome}/rclone/rclone.conf --vfs-cache-mode writes --ignore-checksum mount \"OneDrive:\" ${target}";
+                ExecStop = "/bin/fusermount -u ${target}";
+              };
+              Install.WantedBy = [ "default.target" ];
+            };
+          mount-downloads =
+            let
+              target = config.xdg.userDirs.download;
+            in
+            {
+              Unit = {
+                Description = "Mount Downloads directory to OneDrive";
+                After = [ "network-online.target" ];
+              };
+              Service = {
+                Type = "notify";
+                ExecStartPre = "/usr/bin/env mkdir -p ${target}";
+                ExecStart = "${pkgs.rclone}/bin/rclone --config=${configHome}/rclone/rclone.conf --vfs-cache-mode writes --ignore-checksum mount \"OneDrive:Downloads\" ${target}";
+                ExecStop = "/bin/fusermount -u ${target}";
+              };
+              Install.WantedBy = [ "default.target" ];
+            };
+        };
+    };
   boot = {
     loader.efi.efiSysMountPoint = "/boot/efi";
     initrd = {

system/default.nix

@@ -205,7 +205,12 @@
     enable = true;
     image = ./wallpapers/tropic_island_day.jpg;
     base16Scheme = "${pkgs.base16-schemes}/share/themes/one-light.yaml";
-    opacity.popups = 0.8;
+    opacity = {
+      applications = 0.9;
+      desktop = 0.8;
+      popups = 0.8;
+      terminal = 0.9;
+    };
     cursor = {
       package = pkgs.volantes-cursors;
       name = "volantes_cursors";

system/home/emacs/default.nix

@@ -37,7 +37,6 @@
         nerd-icons-dired
         nerd-icons-ibuffer
         nerd-icons-corfu
-        visual-fill-column
         # Email and Calendar
         khalel
         mu4e

system/home/emacs/init.el

@@ -66,33 +66,8 @@
 (column-number-mode +1)
 (size-indication-mode -1)
 
-(add-hook 'help-mode-hook (lambda () (visual-line-mode +1)))
+(global-visual-line-mode +1)
-
+(setopt visual-line-fringe-indicators '(left-curly-arrow right-curly-arrow))
-(use-package visual-fill-column
-  :functions (visual-fill-column-mode)
-  :hook ((prog-mode . (lambda ()
-                        (visual-line-mode +1)
-                        (visual-fill-column-mode +1)))
-         ((Info-mode man-common) . (lambda ()
-                                     (setq-local visual-fill-column-width 80)
-                                     (visual-line-mode +1)
-                                     (visual-fill-column-mode +1))))
-  :custom
-  (visual-fill-column-width 120)
-  (visual-fill-column-center-text t)
-  (visual-fill-column-enable-sensible-window-split t)
-  :config
-  (setopt visual-line-fringe-indicators '(left-curly-arrow right-curly-arrow)))
-
-(with-eval-after-load 'mu4e
-  (add-hook 'mu4e-view-mode-hook
-            #'(lambda ()
-                (visual-line-mode +1)
-                (visual-fill-column-mode +1)))
-  (add-hook 'mu4e-compose-mode-hook
-            #'(lambda ()
-                (visual-line-mode +1)
-                (visual-fill-column-mode +1))))
 
 (use-package ligature
   :load-path "external-packages/ligature.el/"
@@ -210,6 +185,7 @@
   (("C-c m" . mu4e)
    :map mu4e-view-mode-map
    ("o n" . mu4e-org-store-and-capture))
+  :hook ((mu4e-main-mode mu4e-headers-mode) . (lambda () (visual-line-mode -1)))
   :custom
   (mu4e-read-option-use-builtin nil)
   (mu4e-completing-read-function #'completing-read)
@@ -616,7 +592,9 @@
 (use-package org
   :demand
   :defines org-mode-map
-  :hook ((org-mode . turn-on-auto-fill))
+  :hook ((org-mode . (lambda ()
+                       (visual-line-mode -1)
+                       (turn-on-auto-fill))))
   :bind ( :map org-mode-map
           ("<remap> <imenu>" . consult-org-heading)
           ("<remap> <org-goto>" . consult-org-heading))
@@ -784,7 +762,8 @@
 (use-package org-agenda
   :after (org appt)
   :bind (("C-c a" . org-agenda))
-  :hook (org-agenda-finalize . org-agenda-to-appt)
+  :hook ((org-agenda-mode . (lambda () (visual-line-mode -1)))
+         (org-agenda-finalize . org-agenda-to-appt))
   :custom
   (org-agenda-span 'day)
   (org-agenda-start-on-weekday 1)

system/home/waybar.nix

@@ -292,6 +292,7 @@
     style =
       let
         scheme = config.lib.stylix.scheme.withHashtag;
+        opacity = config.stylix.opacity.desktop;
       in
       ''
         * {
@@ -307,7 +308,7 @@
         }
 
         window > box {
-            color: ${scheme.base05};
+            color: alpha(${scheme.base05}, ${toString opacity});
             background: ${scheme.base00};
             margin: 5px 5px 0px;
             padding: 0px;