Hello Johnny!

> Hi,
>
> I want to share my .stumpwmrc between my desktop and the netbook as the
> setup is nearly identical. However, there are a couple of lines that are
> machine specific. In emacs, I solve this by checking the 'system-name'
> variable in a 'when' clause (see below). Is there something similar I
> could put in .stumpwmrc?
>
> ,---- In my emacs
> | (when (string= (system-name) "my_desktop")
> |      ... load desktop only stuff
> |   )
> `----

The following seems to work for me (assuming /etc/hostname holds the host name)

(defun system-name ()
  (with-open-file (hostname-file "/etc/hostname" :direction :input) (read 
hostname-file)))


Stefan.

_______________________________________________
Stumpwm-devel mailing list
Stumpwm-devel@nongnu.org
https://lists.nongnu.org/mailman/listinfo/stumpwm-devel

Reply via email to