Changeset 9309 for src/Pugs/Run

Timestamp:

03/06/06 22:27:05 (3 years ago)

Author:

audreyt

Message:

* sweeping warnings fix on unused imports and functions.

Files:

• src/Pugs/Run/Args.hs (modified) (1 diff)

src/Pugs/Run/Args.hs

@@ -71 +71 @@
     | takesArg opt              = unpackOption opt ++ (arg:unpackOptions rest)
 unpackOptions (('-':opt):rest)  = unpackOption opt ++ unpackOptions rest
-unpackOptions opts@[filename]   = opts
+unpackOptions opts@[_]          = opts
 unpackOptions (filename:rest)   = filename : "--" : rest