diff --git a/snap.cabal b/snap.cabal
--- a/snap.cabal
+++ b/snap.cabal
@@ -1,5 +1,5 @@
 name:           snap
-version:        0.4.2
+version:        0.4.3
 synopsis:       Snap: A Haskell Web Framework: project starter executable and glue code library
 description:    Snap Framework project starter executable and glue code library
 license:        BSD3
diff --git a/src/Snap/Extension/Loader/Devel.hs b/src/Snap/Extension/Loader/Devel.hs
--- a/src/Snap/Extension/Loader/Devel.hs
+++ b/src/Snap/Extension/Loader/Devel.hs
@@ -11,7 +11,7 @@
 
 import           Control.Monad (liftM2)
 
-import           Data.List (groupBy, intercalate, isPrefixOf, nub)
+import           Data.List
 import           Data.Maybe (catMaybes)
 import           Data.Time.Clock (diffUTCTime, getCurrentTime)
 
@@ -79,13 +79,11 @@
     srcOpts = filter (\x -> "-i" `isPrefixOf` x
                             && not ("-idist" `isPrefixOf` x)) args
 
-    toCopy = init' $ dropWhile (not . ("-package" `isPrefixOf`)) args
+    toCopy = filter (not . isSuffixOf ".hs") $
+             dropWhile (not . ("-package" `isPrefixOf`)) args
     copy = map (intercalate " ") . groupBy (\_ s -> not $ "-" `isPrefixOf` s)
 
     opts = hideAll ++ srcOpts ++ copy toCopy
-
-    init' [] = []
-    init' xs = init xs
 
 
 ------------------------------------------------------------------------------