From 28ae0a13496379693bdbe8bc99b52e456c4b14c6 Mon Sep 17 00:00:00 2001
From: Georgy Litvinov <git@litvinovg.pro>
Date: Fri, 8 May 2020 16:45:27 +0200
Subject: [PATCH] One more fix

---
 ePublishing/Album.xba   | 2 +-
 ePublishing/Archive.xba | 1 +
 2 files changed, 2 insertions(+), 1 deletion(-)

diff --git a/ePublishing/Album.xba b/ePublishing/Album.xba
index b79c022..4dba3b8 100644
--- a/ePublishing/Album.xba
+++ b/ePublishing/Album.xba
@@ -1,6 +1,6 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <!DOCTYPE script:module PUBLIC "-//OpenOffice.org//DTD OfficeDocument 1.0//EN" "module.dtd">
-<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Album" script:language="StarBasic" script:moduleType="normal">Sub albumMark4
+<script:module xmlns:script="http://openoffice.org/2000/script" script:name="Album" script:language="StarBasic" script:moduleType="normal">Sub albumMark5
 End Sub
 
 Sub rotatePageButton
diff --git a/ePublishing/Archive.xba b/ePublishing/Archive.xba
index 55e4b61..032820e 100644
--- a/ePublishing/Archive.xba
+++ b/ePublishing/Archive.xba
@@ -313,6 +313,7 @@ Sub convertBookmarksToFootnotes()
 
 	Dim bookmarks as Object
 	Dim bookmarkName as String
+	Dim bookmarkNames() As String
 	Dim strStart As Integer
 	Dim linkPrefix As String 
 	Dim backLinkSuffix As String