Clean: replace my-hostname with system-name built in

1 files changed, 5 insertions, 5 deletions

diff --git a/shoshimacs.el b/shoshimacs.el
index 10d107f..ae46dbd 100644
--- a/shoshimacs.el
+++ b/shoshimacs.el
@@ -7,10 +7,6 @@
   (setq custom-file my-custom-file)
   (load custom-file))
 
-(defun my-hostname ()
-  "Helper function to determine on which host Emacs is starting."
-  (string-trim (with-temp-buffer (shell-command "hostname" t) (buffer-string))))
-
 (defvar *my-config* "~/projects/shoshimacs/shoshimacs.org"
   "Path to my main configuration file.")
 
@@ -24,6 +20,10 @@
   (interactive)
   (org-babel-load-file *my-config*))
 
+(defun my-hostname ()
+  "Helper function to determine on which host Emacs is starting."
+  (string-trim (with-temp-buffer (shell-command "hostname" t) (buffer-string))))
+
 (defvar my-themes-to-install
   '(cyberpunk-theme dracula-theme nano-theme ef-themes)
   "List of themes to install when loading shoshimacs config.")
@@ -252,7 +252,7 @@
 
 (package-install 'darkroom)
 
-(let ((size (if (or (equal (my-hostname) "zebes") (equal (my-hostname) "ridley")) 14 12)))
+(let ((size (if (or (equal (system-name) "zebes") (equal (system-name) "ridley")) 14 12)))
  (set-frame-font (format "Victor Mono-%s" size)))
 
 (global-hl-line-mode t)