diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,3 +1,7 @@
+## [0.4.1.0](https://github.com/PiotrJustyna/wyvern/tree/0.4.0.1) (2026-03-13)
+
+Fixed bug [#64](https://github.com/PiotrJustyna/wyvern/issues/64) - incorrect action token rendering.
+
 ## [0.4.0.1](https://github.com/PiotrJustyna/wyvern/tree/0.4.0.1) (2026-02-13)
 
 Provided a ci workflow and altered the cabal file slightly to reflect that.
diff --git a/src/lib/Lexer.x b/src/lib/Lexer.x
--- a/src/lib/Lexer.x
+++ b/src/lib/Lexer.x
@@ -26,8 +26,8 @@
     @id [$white]+ \"@content\"      { (\(position, _previousCharacter, _bytes, inputString) len -> return $ TokenAction position (take len inputString)) }
     \"@content\"                    { (\(position, _previousCharacter, _bytes, inputString) len -> return $ TokenAction position ("# " <> take len inputString)) -- # is a placeholder id that will later be replaced by a unique identifier }
     @id                             { (\(position, _previousCharacter, _bytes, inputString) len -> return $ TokenSoloIdentifier position (take len inputString)) }
-    \{                              { (\(position, _previousCharacter, _bytes, _inputString) len -> return $ TokenOCB position) }
-    \}                              { (\(position, _previousCharacter, _bytes, _inputString) len -> return $ TokenCCB position) }
+    \{                              { (\(position, _previousCharacter, _bytes, _inputString) _len -> return $ TokenOCB position) }
+    \}                              { (\(position, _previousCharacter, _bytes, _inputString) _len -> return $ TokenCCB position) }
 
 {
 -- Each token action (the right hand side function) is of type :: AlexInput -> Int -> Alex Token
diff --git a/src/lib/Parser.y b/src/lib/Parser.y
--- a/src/lib/Parser.y
+++ b/src/lib/Parser.y
@@ -52,9 +52,7 @@
   in  take (length idFreeContent' - 1) idFreeContent'
 
 toAction :: String -> Block
-toAction t =
-    Action Nothing (show t)
-    -- Action (toId t) (toContent t)
+toAction t = Action (toId t) (toContent t)
 
 toFork :: String -> [Block] -> [Block] -> Maybe ID -> Block
 toFork t l r rId = Fork (toId t) (toContent t) l r rId
diff --git a/wyvern-diagrams.cabal b/wyvern-diagrams.cabal
--- a/wyvern-diagrams.cabal
+++ b/wyvern-diagrams.cabal
@@ -1,6 +1,6 @@
 cabal-version:      3.4
 name:               wyvern-diagrams
-version:            0.4.0.1
+version:            0.4.1.0
 synopsis:           Simple flowchart diagrams. Inspired by DRAKON.
 description:        Wyvern combines syntax and rendering engine
                     for simple, DRAKON-like flowcharts.
@@ -37,23 +37,23 @@
                       -- BSD-3-Clause
                       base >= 4.19.2.0 && < 5,
                       -- MIT
-                      colour >= 2.3.6 && < 2.3.7,
+                      colour >= 2.3.6 && < 3,
                       -- BSD-2-Clause
-                      text >= 2.1.2 && < 2.2.1,
+                      text >= 2.1.2 && < 3,
                       -- BSD-3-Clause
-                      diagrams-lib >= 1.5.1 && < 1.5.2,
+                      diagrams-lib >= 1.5.1 && < 2,
                       -- BSD-3-Clause
-                      diagrams-svg >= 1.5 && < 1.5.1,
+                      diagrams-svg >= 1.5 && < 2,
                       -- BSD-3-Clause
-                      containers >= 0.7 && < 0.7.1,
+                      containers >= 0.7 && < 1,
                       -- BSD-3-Clause
-                      MissingH >= 1.6.0 && < 1.6.7,
+                      MissingH >= 1.6.0 && < 2,
                       -- BSD-3-Clause
-                      array >= 0.5.8 && < 0.5.9,
+                      array >= 0.5.8 && < 1,
                       -- BSD-3-Clause
-                      unordered-containers >= 0.2.21 && < 0.2.22,
+                      unordered-containers >= 0.2.21 && < 1,
                       -- BSD-3-Clause
-                      optparse-applicative >= 0.19.0 && < 0.19.1
+                      optparse-applicative >= 0.19.0 && < 1
     default-language: Haskell2010
 
 executable wyvern-diagrams
@@ -63,9 +63,9 @@
                       -- BSD-3-Clause
                       base >= 4.19.2.0 && < 5,
                       -- BSD-3-Clause
-                      diagrams-svg >= 1.5 && < 1.5.1,
+                      diagrams-svg >= 1.5 && < 2,
                       -- BSD-3-Clause
-                      optparse-applicative >= 0.19.0 && < 0.19.1,
+                      optparse-applicative >= 0.19.0 && < 1,
                       wyvern-diagrams
     hs-source-dirs:   src/app
     default-language: Haskell2010
@@ -80,8 +80,8 @@
                       -- BSD-3-Clause
                       HUnit,
                       -- BSD-3-Clause
-                      diagrams-lib >= 1.5.1 && < 1.5.2,
+                      diagrams-lib >= 1.5.1 && < 2,
                       -- BSD-3-Clause
-                      containers >= 0.7 && < 0.7.1,
+                      containers >= 0.7 && < 1,
                       wyvern-diagrams
     default-language: Haskell2010