update message again

unison-cli/src/Unison/CommandLine/OutputMessages.hs

@@ -2200,9 +2200,8 @@ notifyUser dir = \case
                   <> operationName
                   <> "because one of your types,"
                   <> P.group (prettyName typeName <> ",")
-                  <> "has unnamed constructors.",
-              "",
-              P.wrap $ "I currently need each constructor to have a name somewhere under the type name.",
+                  <> "has unnamed constructors."
+                  <> "(I currently need each constructor to have a name somewhere under the type name.)",
               "",
               P.wrap $
                 "You can use"

unison-src/transcripts/update-type-missing-constructor.output.md

@@ -54,10 +54,8 @@ unique type Foo = Bar Nat Nat
   updated...
 
   I couldn't complete the update because one of your types, Foo,
-  has unnamed constructors.
-  
-  I currently need each constructor to have a name somewhere
-  under the type name.
+  has unnamed constructors. (I currently need each constructor
+  to have a name somewhere under the type name.)
   
   You can use `view Foo` and
   `alias.term <hash> Foo.<ConstructorName>` to give names to

unison-src/transcripts/update-type-stray-constructor.output.md

@@ -56,10 +56,8 @@ Note that the constructor name shown here (implied to be called `Foo.Stray.Bar`)
   updated...
 
   I couldn't complete the update because one of your types, Foo,
-  has unnamed constructors.
-  
-  I currently need each constructor to have a name somewhere
-  under the type name.
+  has unnamed constructors. (I currently need each constructor
+  to have a name somewhere under the type name.)
   
   You can use `view Foo` and
   `alias.term <hash> Foo.<ConstructorName>` to give names to