diff --git a/ChangeLog.md b/ChangeLog.md
--- a/ChangeLog.md
+++ b/ChangeLog.md
@@ -12,3 +12,7 @@
 ## 0.3.0.0 -- 2020-06-02
 
 * Third version. Added new generalized functions to the DobutokO.Poetry module and extended with them the functionality in the Main module. 
+
+## 0.3.1.0 -- 2020-06-02
+
+* Third version revised A. Fixed issue with being printed also the second command line argument for the Main.main function.
diff --git a/Main.hs b/Main.hs
--- a/Main.hs
+++ b/Main.hs
@@ -30,7 +30,7 @@
   args <- getArgs
   let arg0 = concat . take 1 $ args
       arg01 = concat . drop 1 . take 2 $ args
-      word1s = unwords . drop 1 $ args
+      word1s = unwords . drop 2 $ args
   arg1 <- onException (do 
     let aa = read arg01::Int
     return aa) (return 10)
diff --git a/dobutokO-poetry.cabal b/dobutokO-poetry.cabal
--- a/dobutokO-poetry.cabal
+++ b/dobutokO-poetry.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                dobutokO-poetry
-version:             0.3.0.0
+version:             0.3.1.0
 synopsis:            Helps to order the 7 or less Ukrainian words to obtain somewhat suitable for poetry or music text
 description:         Helps to order the 7 or less Ukrainian words (or their concatenations) to obtain somewhat suitable for poetry or music text.