1 files changed, 9 insertions, 9 deletions

diff --git a/wizards/source/template/ModuleAgenda.xba b/wizards/source/template/ModuleAgenda.xba
index 8291940012f5..b840c05bd009 100644
--- a/wizards/source/template/ModuleAgenda.xba
+++ b/wizards/source/template/ModuleAgenda.xba
@@ -10,13 +10,13 @@ Dim DlgAgenda_gMyName as String
 Public TemplateDialog as Object
 Public DialogModel as Object
 Public sTrueContent as String
-Public Bookmarkname as String	
+Public Bookmarkname as String
 
 
 
 Sub Initialize()
 ' User sets the type of minutes
-	LoadLibrary( "Tools" )
+        BasicLibraries.LoadLibrary( "Tools" )
 	TemplateDialog = LoadDialog("Template", "TemplateDialog")
 	DialogModel = TemplateDialog.Model
 	DialogModel.Step = 1
@@ -44,12 +44,12 @@ End Sub
 Sub ModifyTemplate()
 Dim oDocument, oBookmarks, oBookmark, oBookmarkCursor, oTextField as Object
 Dim i as Integer
-	
+
 	oDocument = StarDesktop.ActiveFrame.Controller.Model
 	oBookMarks = oDocument.Bookmarks
 
 	On Local Error Goto NOBOOKMARK
-' Todo: auch beim Schließen des Dialogs muss was passieren	
+' Todo: auch beim Schließen des Dialogs muss was passieren
 	TemplateDialog.EndExecute
 	DialogExited = TRUE
 	oBookmarkCursor = CreateBookmarkCursor(oDocument, BookmarkName)
@@ -89,7 +89,7 @@ Sub NewTopic
 Dim oDocument, oBookmarks, oBookmark, oBookmarkCursor, oTextField as Object
 Dim oBaustein, oAutoText, oAutoGroup as Object
 Dim i as Integer
-	
+
 	oDocument = StarDesktop.ActiveFrame.Controller.Model
 	oBookMarkCursor = CreateBookMarkCursor(oDocument, "NextTopic")
 	oTextField = oBookMarkCursor.TextField
@@ -118,7 +118,7 @@ Dim oBookmarkCursor as Object
 Dim oFormats, oLocale as Object
 Dim iDateTimeKey as Integer
 
-	LoadLibrary( "Tools" )
+        BasicLibraries.LoadLibrary( "Tools" )
 	oDocument = StarDesktop.ActiveFrame.Controller.Model
 
 	oUserField = oDocument.CreateInstance("com.sun.star.text.TextField.ExtendedUser")
@@ -151,7 +151,7 @@ Function CreateBookMarkCursor(oDocument as Object,sBookmarkName as String)
 	Else
 		Msgbox "Bookmark " & sBookmarkName &  " is not defined!"
 	End If
-End Function	
+End Function
 
 
 
@@ -179,7 +179,7 @@ Dim BtnFinishAgenda As Object
 	If AgendaFinished Then
 		DisposeControl(oDocument, "BtnAddAgendaTopic")
 		DisposeControl(oDocument, "BtnFinishAgenda")
-	
+
 		oBookmarkCursor = CreateBookMarkCursor(oDocument,"NextTopic")
 		oBookMarkCursor.GotoEnd(True)
 		oBookmarkCursor.Text.insertString(oBookmarkCursor,"",True)
@@ -197,7 +197,7 @@ Dim CurTag as String
 Dim Taglist() as String
 	CurTag = aEvent.Source.Model.Tag
 	Taglist() = ArrayoutOfString(CurTag, ";")
-	Bookmarkname = TagList(0)	
+	Bookmarkname = TagList(0)
 	sTrueContent = TagList(1)
 End Sub
 </script:module>
\ No newline at end of file