branch: externals/setup
commit bee533a4d791eeba9b9cf675cd3d664a12e097ce
Author: Philip Kaludercic <phil...@posteo.net>
Commit: Philip Kaludercic <phil...@posteo.net>
Add :if-host keyword
---
setup.el | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/setup.el b/setup.el
index b496ba1..8840d03 100644
--- a/setup.el
+++ b/setup.el
@@ -498,6 +498,12 @@ the first PACKAGE."
:repeatable t
:shorthand #'cadr)
+(setup-define :if-host
+ (lambda (hostname)
+ `(unless (string= (system-name) ,hostname)
+ (throw 'setup-exit nil)))
+ :documentation "If HOSTNAME is not the current hostname, stop evaluating
form.")
+
(setup-define :only-if
(lambda (condition)
`(unless ,condition
