-- |Run a 'Pipeline'.  (or rather, return something that will)
pipeline :: OnErr -> Pipeline -> Shell ShellProcess
pipeline b (Pipeline [s]) = sec $ runStatement b s
pipeline :: OnErr -> Pipeline -> Shell ShellProcess
pipeline b (Pipeline [s]) = sec $ runStatement b s
pipeline b (Pipeline [s]) = sec $ runStatement b s