bump version

Author: functora

ghcjs/currency-converter/overlays.nix

@@ -145,7 +145,7 @@
                   self.callCabal2nix
                   "singlethongs" "${functora}/pub/singlethongs" {};
                 miso =
-                  pkgs.haskell.lib.enableCabalFlag
+                  pkgs.haskell.lib.disableCabalFlag
                   (
                     self.callCabal2nix
                     "miso" "${functora}/pub/miso" {}

ghcjs/currency-converter/src/App/Types.hs

@@ -53,6 +53,7 @@ data Model = Model
     modelState :: St Unique,
     modelMarket :: MVar Rates.Market,
     modelFavMap :: Map MisoString Fav,
+    modelFavName :: Field MisoString Unique,
     modelCurrencies :: NonEmpty CurrencyInfo,
     modelSnackbarQueue :: Snackbar.Queue Action,
     modelProducerQueue :: TChan (ChanItem (Model -> Model)),
@@ -98,7 +99,6 @@ data StDoc f = StDoc
   { stDocTopMoney :: Money f,
     stDocBottomMoney :: Money f,
     stDocTopOrBottom :: TopOrBottom,
-    stDocPreFavName :: Field MisoString f,
     stDocFieldPairs :: [FieldPair DynamicField f],
     stDocOnlineOrOffline :: OnlineOrOffline,
     stDocCreatedAt :: UTCTime
@@ -124,13 +124,11 @@ newStDoc = do
   ct <- getCurrentTime
   topMoney <- newMoney 1 btc
   bottomMoney <- newMoney 0 usd
-  preFavName <- newTextField mempty
   pure
     StDoc
       { stDocTopMoney = topMoney,
         stDocBottomMoney = bottomMoney,
         stDocTopOrBottom = Top,
-        stDocPreFavName = preFavName,
         stDocFieldPairs = mempty,
         stDocOnlineOrOffline = Online,
         stDocCreatedAt = ct

ghcjs/currency-converter/src/App/Widgets/Fav.hs

@@ -34,9 +34,7 @@ fav st =
                   <> [ Cell.mediumCell
                         $ Field.textField
                           st
-                          ( #modelState
-                              . #stDoc
-                              . #stDocPreFavName
+                          ( #modelFavName
                           )
                           ( Field.defOpts
                               & #optsPlaceholder
@@ -139,12 +137,7 @@ makeFavName st =
     $ fromMisoString preFavName
   where
     preFavName =
-      st
-        ^. #modelState
-        . #stDoc
-        . #stDocPreFavName
-        . #fieldInput
-        . #uniqueValue
+      st ^. #modelFavName . #fieldInput . #uniqueValue
 
 favItems :: Model -> [View Action]
 favItems st =

ghcjs/currency-converter/src/App/Widgets/Menu.hs

@@ -66,9 +66,7 @@ menu st =
                               next
                                 & #modelFav
                                 .~ Opened
-                                & #modelState
-                                . #stDoc
-                                . #stDocPreFavName
+                                & #modelFavName
                                 . #fieldInput
                                 . #uniqueValue
                                 .~ defFavName next

ghcjs/currency-converter/src/App/Widgets/Templates.hs

@@ -55,6 +55,7 @@ newModel webOpts mSt uri = do
           (mSt ^? _Just . #modelState . #stScreen)
   let defCpt =
         mSt ^? _Just . #modelState . #stCpt . _Just
+  favName <- newTextField mempty
   mApp <- unShareUri uri
   st <-
     maybe
@@ -105,6 +106,7 @@ newModel webOpts mSt uri = do
         modelState = st,
         modelMarket = market,
         modelFavMap = mempty,
+        modelFavName = favName,
         modelCurrencies =
           fromMaybe
             [btc, usd]

ghcjs/currency-converter/src/Main.hs

@@ -273,6 +273,9 @@ syncInputs st = do
   void
     . Syb.everywhereM (Syb.mkM fun)
     $ modelState st
+  void
+    . Syb.everywhereM (Syb.mkM fun)
+    $ modelFavName st
   where
     fun :: Unique MisoString -> JSM (Unique MisoString)
     fun txt = do

ghcjs/invoice-generator/app.cabal

@@ -1,6 +1,6 @@
 cabal-version: 2.2
 name:          app
-version:       0.1.0.8
+version:       0.1.0.9
 synopsis:      First miso app
 category:      Web
 build-type:    Simple

ghcjs/invoice-generator/trapeze.yaml

@@ -1,8 +1,8 @@
 platforms:
   android:
     appName: Currency Converter
-    versionCode: 8
-    versionName: 0.1.0.8
+    versionCode: 9
+    versionName: 0.1.0.9
     packageName: com.functora.currency_converter
     manifest:
       - file: AndroidManifest.xml