diff --git a/src/examples/Funogram.TestBot/Commands/Base.fs b/src/examples/Funogram.TestBot/Commands/Base.fs
index 0775411..f793f4c 100644
--- a/src/examples/Funogram.TestBot/Commands/Base.fs
+++ b/src/examples/Funogram.TestBot/Commands/Base.fs
@@ -65,7 +65,7 @@ let updateArrived (ctx: UpdateContext) =
       match c.Message with
       | Some (MaybeInaccessibleMessage.Message msg) ->
         let inlineKeyboardMarkup = InlineKeyboardMarkup.Create([| [| InlineKeyboardButton.Create("Changed!", callbackData = "Test") |] |])
-        Req.EditMessageReplyMarkup.Make(msg.Chat.Id, msg.MessageId, replyMarkup = inlineKeyboardMarkup)
+        Req.EditMessageReplyMarkup.Make(chatId = ChatId.Int msg.Chat.Id, messageId = msg.MessageId, replyMarkup = inlineKeyboardMarkup)
         |> bot ctx.Config
       | _ -> ()
     | _ -> ()
diff --git a/src/examples/Funogram.TestBot/Commands/Files.fs b/src/examples/Funogram.TestBot/Commands/Files.fs
index 41f0392..e5a2fa9 100644
--- a/src/examples/Funogram.TestBot/Commands/Files.fs
+++ b/src/examples/Funogram.TestBot/Commands/Files.fs
@@ -18,6 +18,7 @@ let testUploadAndSendPhotoGroup config (chatId: int64) =
       ParseMode = None
       CaptionEntities = None
       HasSpoiler = None
+      ShowCaptionAboveMedia = None
     } |> InputMedia.Photo
   
   let image1 = Http.RequestStream(PhotoUrl).ResponseStream
@@ -38,6 +39,7 @@ let testUploadAndSendPhotoGroupAsBytes config (chatId: int64) =
       ParseMode = None
       CaptionEntities = None
       HasSpoiler = None
+      ShowCaptionAboveMedia = None
     } |> InputMedia.Photo
   
   use image1 = Http.RequestStream(PhotoUrl).ResponseStream