From c954347451708e677e39f25f778e7dd215c7f750 Mon Sep 17 00:00:00 2001
From: Avinal Kumar <avinal.xlvii@gmail.com>
Date: Wed, 14 Sep 2022 17:20:25 +0530
Subject: [PATCH] fix some bugs

---
 .../lovely-dangerous-things-redhat.md         |  2 +-
 public/index.html                             |  4 +-
 public/mdn-style.css                          |  2 +-
 src/Blog.elm                                  | 40 +++++++++----------
 src/Main.elm                                  |  6 +--
 5 files changed, 26 insertions(+), 28 deletions(-)

diff --git a/content/posts/development/lovely-dangerous-things-redhat.md b/content/posts/development/lovely-dangerous-things-redhat.md
index 0d4246a..8fc2c33 100644
--- a/content/posts/development/lovely-dangerous-things-redhat.md
+++ b/content/posts/development/lovely-dangerous-things-redhat.md
@@ -179,7 +179,7 @@ touch pkg/api/spacetime/v1alpha1/{spacetime_types,register,doc}.go pkg/api/space
 
 Add the following content to the corresponding files.
 
-``` golang
+``` go
 // file: /pkg/api/spacetime/v1alpha1/spacetime_types.go
 package v1alpha1
 
diff --git a/public/index.html b/public/index.html
index ccbfafc..4bf7d3c 100644
--- a/public/index.html
+++ b/public/index.html
@@ -68,9 +68,7 @@
                     return Prism.highlight(code, grammar, lang);
                 }
             })
-            document.getElementById("insert-here").innerHTML = marked.parse(markdowndata, function () {
-                renderSuccess = true;
-            });
+            document.getElementById("insert-here").innerHTML = marked.parse(markdowndata);
             // document.getElementById("toc-entries").innerHTML = toc;
         });
 
diff --git a/public/mdn-style.css b/public/mdn-style.css
index af365d1..f17c077 100644
--- a/public/mdn-style.css
+++ b/public/mdn-style.css
@@ -56,7 +56,7 @@ a {
 
 img,
 picture {
-     display: block; 
+     /* display: block;  */
     max-width: 100%
 }
 
diff --git a/src/Blog.elm b/src/Blog.elm
index 2da1e05..14a08e3 100644
--- a/src/Blog.elm
+++ b/src/Blog.elm
@@ -50,7 +50,7 @@ initialModel =
 port sendString : String -> Cmd msg
 
 
-port isRenderComplete : (Bool -> msg) -> Sub msg
+-- port isRenderComplete : (Bool -> msg) -> Sub msg
 
 
 view : Model -> Html Msg
@@ -130,17 +130,17 @@ viewMetadata show =
         ]
 
 
-scrollOnFragment : String -> Cmd Msg
-scrollOnFragment fragment =
-    Task.attempt ScrollAttempted
-        (Dom.getElement fragment |> Task.andThen (\info -> Dom.setViewport 0 info.element.y))
+-- scrollOnFragment : String -> Cmd Msg
+-- scrollOnFragment fragment =
+--     Task.attempt ScrollAttempted
+--         (Dom.getElement fragment |> Task.andThen (\info -> Dom.setViewport 0 info.element.y))
 
 
 type Msg
     = GetMarkdown
     | DataReceived (Result Http.Error String)
-    | ScrollToFragment Bool Bool
-    | ScrollAttempted (Result Dom.Error ())
+    -- | ScrollToFragment Bool Bool
+    -- | ScrollAttempted (Result Dom.Error ())
     | NoSuchPage
 
 
@@ -223,14 +223,14 @@ update msg model =
         DataReceived (Err err) ->
             ( { model | success = False, error = Just (errorToString err) }, Cmd.none )
 
-        ScrollToFragment _ _ ->
-            ( model, scrollOnFragment model.fragment )
+        -- ScrollToFragment _ _ ->
+        --     ( model, scrollOnFragment model.fragment )
 
         NoSuchPage ->
             ( { model | success = False }, Cmd.none )
 
-        ScrollAttempted _ ->
-            ( model, Cmd.none )
+        -- ScrollAttempted _ ->
+        --     ( model, Cmd.none )
 
 
 errorToString : Http.Error -> String
@@ -258,16 +258,16 @@ errorToString error =
             errorMessage
 
 
-subscriptions : Model -> Sub Msg
-subscriptions model =
-    isRenderComplete
-        (ScrollToFragment <|
-            if model.fragment == "" then
-                False
+-- subscriptions : Model -> Sub Msg
+-- subscriptions model =
+--     isRenderComplete
+--         (ScrollToFragment <|
+--             if model.fragment == "" then
+--                 False
 
-            else
-                True
-        )
+--             else
+--                 True
+--         )
 
 
 
diff --git a/src/Main.elm b/src/Main.elm
index 58ca13d..639f386 100644
--- a/src/Main.elm
+++ b/src/Main.elm
@@ -286,9 +286,9 @@ updateUrl model =
 subscriptions : Model -> Sub Msg
 subscriptions model =
     case model.page of
-        BlogPage blogModel ->
-            Blog.subscriptions blogModel
-                |> Sub.map GotBlogMsg
+        -- BlogPage blogModel ->
+        --     Blog.subscriptions blogModel
+        --         |> Sub.map GotBlogMsg
 
         _ ->
             Sub.none