From c9bc2af27071ac751b4a7473dce104c2ee39446e Mon Sep 17 00:00:00 2001
From: randomuser <randomuser@tilde.club>
Date: Sun, 15 Oct 2023 13:31:04 -0500
Subject: [PATCH] misc changes

---
 boxes/mlg.nix                      | 19 ++++++++++++++++
 builds/utils/sh/pash-dmenu-backend |  1 +
 config/emacs/init.el               | 35 ++++++++++++++++++++++++++----
 3 files changed, 51 insertions(+), 4 deletions(-)

diff --git a/boxes/mlg.nix b/boxes/mlg.nix
index 2e074a5..cf5eea5 100644
--- a/boxes/mlg.nix
+++ b/boxes/mlg.nix
@@ -8,6 +8,21 @@
     ../common/steam.nix
   ];
 
+  environment.systemPackages = with pkgs; [
+    wine
+    xdotool
+
+    qemu
+    virt-manager
+    gnome.cheese
+    calyx-vpn
+    android-studio
+    emacs
+    deepin.deepin-album
+    nomacs
+    vscodium
+  ];
+
   boot.loader = {
     efi = {
       canTouchEfiVariables = true;
@@ -19,5 +34,9 @@
     };
   };
 
+  virtualisation.libvirtd.enable = true;
+  programs.dconf.enable = true;
+  users.users.usr.extraGroups = [ "libvirtd" ];
+
   networking.hostName = "mlg";
 }
diff --git a/builds/utils/sh/pash-dmenu-backend b/builds/utils/sh/pash-dmenu-backend
index ab70c4f..86d61d6 100755
--- a/builds/utils/sh/pash-dmenu-backend
+++ b/builds/utils/sh/pash-dmenu-backend
@@ -1,5 +1,6 @@
 #!/bin/sh
 
+printf "%s\n" "$1"
 pash c "$1"
 bspc node -d '^9'
 sleep 15
diff --git a/config/emacs/init.el b/config/emacs/init.el
index b6443ed..856a315 100644
--- a/config/emacs/init.el
+++ b/config/emacs/init.el
@@ -11,6 +11,8 @@
 (menu-bar-mode -1)
 (tool-bar-mode -1)
 (scroll-bar-mode -1)
+(setq auto-save-default nil)
+(add-hook 'prog-mode-hook 'display-line-numbers-mode)
 
 (defun keymap-symbol (keymap)
   "Return the symbol to which KEYMAP is bound, or nil if no such symbol exists."
@@ -44,10 +46,19 @@
   (package-install 'anaconda-mode))
 (unless (package-installed-p 'company-anaconda)
   (package-install 'company-anaconda))
+(unless (package-installed-p 'calfw)
+  (package-install 'calfw))
+(unless (package-installed-p 'calfw-org)
+  (package-install 'calfw-org))
+(unless (package-installed-p 'calfw-ical)
+  (package-install 'calfw-ical))
 
 ;; activate packages
 (require 'evil)
 (require 'org)
+(require 'calfw)
+(require 'calfw-org)
+(require 'calfw-ical)
 (require 'org-drill)
 (require 'accent)
 (require 'elfeed)
@@ -68,8 +79,12 @@
 
 (evil-set-leader 'normal (kbd "<SPC>"))
 (defun configreload () (interactive) (load "~/.config/emacs/init.el"))
+(defun configread () (interactive) (find-file-noselect "~/dot_testing/config/emacs/init.el"))
+(defun nixrebuild () (interactive) (term "rebuild"))
 
 (evil-define-key 'normal 'global (kbd "<leader>rr") 'configreload)
+(evil-define-key 'normal 'global (kbd "<leader>re") 'configread)
+(evil-define-key 'normal 'global (kbd "<leader>nrr") 'nixrebuild)
 (evil-ex-define-cmd "get-current-mapping" 'get-local-map)
 (evil-mode 1)
 
@@ -87,14 +102,26 @@
 (add-to-list 'company-backends 'company-anaconda)
 (add-hook 'python-mode-hook 'anaconda-mode)
 
-
-
 ;; org
 (setq org-agenda-files '("~/org"))
 (setq calendar-week-start-day 1)
 (setq org-todo-keywords '((type "MEETING" "CLASS" "TODO" "REHERSAL" "|" "DONE")))
 (setq org-return-follows-link t)
 
+;; calfw
+(defun google-calendar (id) (concatenate 'string "https://calendar.google.com/calendar/ical/" id "%40group.calendar.google.com/public/basic.ics"))
+
+(defun my-open-calendar ()
+  (interactive)
+  (cfw:open-calendar-buffer
+   :contents-sources
+   (list
+    (cfw:org-create-source "Green")
+    (cfw:ical-create-source "wcs" (google-calendar "c_037e243v5md54rj8kp1k898oo4") "IndianRed")
+    (cfw:ical-create-source "band" (google-calendar "i6bong6iferbcuf1u25jg47t7k") "Blue")
+    (cfw:ical-create-source "schoology" "https://wcschools.schoology.com/calendar/feed/ical/1692031887/ef3eab3f5ac45935472a9fa6f601a63a/ical.ics" "Yellow")
+   ))) 
+
 ;; emms
 (require 'emms-player-simple)
 (require 'emms-source-file)
@@ -116,11 +143,11 @@
 	"https://digitallibrary.un.org/rss?ln=en&p=libya&rg=50&c=Resource%20Type&c=UN%20Bodies"
         "https://planet.emacslife.com/atom.xml"))
 
+(setq elfeed-db-directory "~/.cache/elfeed")
+
 ;; - accent.el
 (evil-define-key 'insert 'global (kbd "C-k") 'accent-menu)
 
-
-
 ;; fonts
 (set-face-attribute 'default nil
 		    :font "Fantasque Sans Mono 10"