use InfoBegin in metadata file

This should avoid pdftk error output.  This output suggested the
metadata was not getting set, but it was.

1 files changed, 3 insertions, 1 deletions

diff --git a/Main.hs b/Main.hs
index 47b6b18..cdc7c4b 100644
--- a/Main.hs
+++ b/Main.hs
@@ -100,8 +100,10 @@ processScanSessDir st dir = withCurrentDirectory dir $ do
                                   defaultTimeLocale
                                   (iso8601DateFormat Nothing)
                                   (posixSecondsToUTCTime posix)
-                       in unlines [ "InfoKey: Title"
+                       in unlines [ "InfoBegin"
+                                  , "InfoKey: Title"
                                   , "InfoValue: scan of " ++ date
+                                  , "InfoBegin"
                                   , "InfoKey: Author"
                                   , "InfoValue: spw"
                                   ]