X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fmain%2FDynFlags.hs;fp=compiler%2Fmain%2FDynFlags.hs;h=46f2affb7693d91dd80391a4dd2d1a3ac8a60fb9;hp=7db0b9abe64e09830005d1ee8dae818ee8955982;hb=4ed961f645b62d231c4f0514ac76ad331c2f6642;hpb=1a410093862a85b51aa59605af80868eaecd25c4

diff --git a/compiler/main/DynFlags.hs b/compiler/main/DynFlags.hs
index 7db0b9a..46f2aff 100644
--- a/compiler/main/DynFlags.hs
+++ b/compiler/main/DynFlags.hs
@@ -1185,8 +1185,8 @@ dynamic_flags = [
   , Flag "dylib-install-name" (hasArg setDylibInstallName)
 
         ------- Libraries ---------------------------------------------------
-  , Flag "L"   (Prefix    addLibraryPath)
-  , Flag "l"   (AnySuffix (upd . addOptl))
+  , Flag "L"   (Prefix addLibraryPath)
+  , Flag "l"   (hasArg (addOptl . ("-l" ++)))
 
         ------- Frameworks --------------------------------------------------
         -- -framework-path should really be -F ...