2 files changed, 8 insertions, 2 deletions

diff --git a/accounts/gkleen@sif/default.nix b/accounts/gkleen@sif/default.nix
index a318a8ee..0d36478c 100644
--- a/accounts/gkleen@sif/default.nix
+++ b/accounts/gkleen@sif/default.nix
@@ -47,6 +47,12 @@ let
         --prefix PATH : ${pkgs.pulseaudio}/bin
     '';
   };
+  wrappedChrome = pkgs.runCommand "${pkgs.google-chrome.name}-wrapped" {} ''
+    mkdir -p "$out/bin"
+    install -m 0755 ${pkgs.google-chrome}/bin/google-chrome-stable $out/bin/google-chrome
+    wrapProgram $out/bin/google-chrome \
+      --add-flags '--force-device-scale-factor=1.6'
+  '';
 in {
   imports = with flake.nixosModules.userProfiles.${userName}; [
     mpv
@@ -208,7 +214,7 @@ in {
         thunderbird zulip zoom-us steam steam-run wireshark skype
         virt-manager rclone cached-nix-shell xournal discord xmonad
         worktime fira-code-symbols emacsclientDesktopItem libreoffice
-        xournalpp
+        xournalpp wrappedChrome
       ];
 
       file = {
diff --git a/accounts/gkleen@sif/xmonad/xmonad.hs b/accounts/gkleen@sif/xmonad/xmonad.hs
index d21debdf..d75d0de6 100644
--- a/accounts/gkleen@sif/xmonad/xmonad.hs
+++ b/accounts/gkleen@sif/xmonad/xmonad.hs
@@ -220,7 +220,7 @@ hostFromName h
                                           , hWsp = hWsp
                                           , hCoWsp = hCoWsp
                                           , hKeysMod = \conf -> Map.union $ (Map.fromList $ join $ map (spawnBindings conf) [ (xK_e, ["emacsclient -c"])
-                                                                                                                            , (xK_d, [fromString browser, fromString $ browser ++ " $(xclip -o)", fromString $ "notmuch-links"])
+                                                                                                                            , (xK_d, [fromString browser, "google-chrome", "notmuch-links"])
                                                                                                                             , (xK_c, [ inputPrompt xPConfig "dc" ?+ dc ])
                                                                                                                             , (xK_g, ["pidgin"])
                                                                                                                             , (xK_s, ["skype"])