Permalink
Browse files

Re-add working directory support (oops!)

  • Loading branch information...
1 parent c0703c6 commit 1a78a9b961797c93605c040462d6008477c5dce4 Jamie Turner committed Jan 11, 2012
Showing with 3 additions and 0 deletions.
  1. +3 −0 Angel/Config.hs
View
@@ -56,6 +56,9 @@ modifyProg prog "stdout" _ = error "wrong type for field 'stdout'; string requir
modifyProg prog "stderr" (String s) = prog{stderr = (T.unpack s)}
modifyProg prog "stderr" _ = error "wrong type for field 'stderr'; string required"
+modifyProg prog "directory" (String s) = prog{workingDir = (Just $ T.unpack s)}
+modifyProg prog "directory" _ = error "wrong type for field 'directory'; string required"
+
modifyProg prog n _ = error $ "unrecognized field: " ++ n

0 comments on commit 1a78a9b

Please sign in to comment.