cadey
/
propellor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

propellor spin

This commit is contained in:
Joey Hess 2015-03-12 16:46:52 -04:00
parent df6162331d
commit 677ce2d28f
Failed to extract signature
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/Propellor/Property/SiteSpecific/JoeySites.hs
View File

@ -44,6 +44,7 @@ scrollBox = propertyList "scroll server" $ props
, "cd " ++ d , "cd " ++ d
, "mkdir -p tmp" , "mkdir -p tmp"
, "TMPDIR= t=$(tempfile -d tmp)" , "TMPDIR= t=$(tempfile -d tmp)"
, "export t"
, "rm -f \"$t\"" , "rm -f \"$t\""
, "mkdir \"$t\"" , "mkdir \"$t\""
, "cd \"$t\"" , "cd \"$t\""
@ -59,7 +60,7 @@ scrollBox = propertyList "scroll server" $ props
, "echo Your game was recorded, as ID:$(basename \"$t\")" , "echo Your game was recorded, as ID:$(basename \"$t\")"
, "echo if you would like to talk about how it went, email scroll@joeyh.name" , "echo if you would like to talk about how it went, email scroll@joeyh.name"
, "echo 'or, type comments below (finish with a dot on its own line)'" , "echo 'or, type comments below (finish with a dot on its own line)'"
, "mail joey@kitenet.net" , "mail -s \"scroll test $t\" joey@kitenet.net"
] `onChange` (g `File.mode` (combineModes (ownerWriteMode:readModes ++ executeModes))) ] `onChange` (g `File.mode` (combineModes (ownerWriteMode:readModes ++ executeModes)))
& Apt.installed ["bsd-mailx"] & Apt.installed ["bsd-mailx"]
-- prevent port forwarding etc by not letting scroll log in via ssh -- prevent port forwarding etc by not letting scroll log in via ssh