Revert "Export `copyrightMessage` from Text.Pandoc.App module."

This reverts commit 2cf9b55421d7026dac8c45730b8538f13e4bbb78.

1 files changed, 8 insertions, 1 deletions

diff --git a/pandoc-cli/src/pandoc.hs b/pandoc-cli/src/pandoc.hs
index dd172696a..9e82d02bc 100644
--- a/pandoc-cli/src/pandoc.hs
+++ b/pandoc-cli/src/pandoc.hs
@@ -16,7 +16,7 @@ module Main where
 import qualified Control.Exception as E
 import System.Environment (getArgs, getProgName)
 import Text.Pandoc.App ( convertWithOpts, defaultOpts, options
-                       , parseOptionsFromArgs, handleOptInfo, copyrightMessage )
+                       , parseOptionsFromArgs, handleOptInfo )
 import Text.Pandoc.Error (handleError)
 import System.Exit (exitSuccess)
 import Data.Monoid (Any(..))
@@ -67,6 +67,13 @@ main = E.handle (handleError . Left) $ do
             Left e -> handleOptInfo engine e
             Right opts -> convertWithOpts engine opts
 
+copyrightMessage :: String
+copyrightMessage =
+ "Copyright (C) 2006-2024 John MacFarlane. Web: https://pandoc.org\n"
+ ++
+ "This is free software; see the source for copying conditions. There is no\n"
+ ++
+ "warranty, not even for merchantability or fitness for a particular purpose."
 
 flagSettings :: String
 flagSettings = "Features: " ++