Commit 49f2eac1 authored by Oleg Grenrus's avatar Oleg Grenrus Committed by Edward Z. Yang
Browse files

Have path as the last argument

parent 92076310
...@@ -27,7 +27,7 @@ import System.FilePath (takeBaseName) ...@@ -27,7 +27,7 @@ import System.FilePath (takeBaseName)
runStrip :: Verbosity -> ProgramDb -> FilePath -> [String] -> IO () runStrip :: Verbosity -> ProgramDb -> FilePath -> [String] -> IO ()
runStrip verbosity progDb path args = runStrip verbosity progDb path args =
case lookupProgram stripProgram progDb of case lookupProgram stripProgram progDb of
Just strip -> runProgram verbosity strip (path:args) Just strip -> runProgram verbosity strip (args ++ [path])
Nothing -> unless (buildOS == Windows) $ Nothing -> unless (buildOS == Windows) $
-- Don't bother warning on windows, we don't expect them to -- Don't bother warning on windows, we don't expect them to
-- have the strip program anyway. -- have the strip program anyway.
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment