Fix #1103

Signed-off-by: Rudi Grinberg <rudi.grinberg@gmail.com>

CHANGES.md

@@ -1,3 +1,9 @@
+next
+----
+
+- Fix `$ jbuilder --dev` (#1104, fixes #1103, @rgrinberg)
+
+
 1.1.0 (06/08/2018)
 ------------------
 

bin/main.ml

@@ -399,9 +399,10 @@ let common =
                & info ["dev"] ~docs
                    ~doc:{|Same as $(b,--profile dev)|})
         in
-        match dev with
-        | false -> `Ok false
-        | true ->
+        match dev, Which_program.t with
+        | false, (Dune | Jbuilder) -> `Ok false
+        | true, Jbuilder -> `Ok true
+        | true, Dune ->
           `Error
             (true, "--dev is no longer accepted as it is now the default.")
       and profile =

test/blackbox-tests/test-cases/dev-flag-1103/run.t

@@ -1,10 +1,6 @@
 jbuilder --dev flag is accepted
 
   $ jbuilder build --dev
-  dune: --dev is no longer accepted as it is now the default.
-  Usage: dune build [OPTION]... [TARGET]...
-  Try `dune build --help' or `dune --help' for more information.
-  [1]
 
 dune --dev flag is rejected