1 files changed, 6 insertions, 6 deletions

diff --git a/wizards/source/scriptforge/SF_FileSystem.xba b/wizards/source/scriptforge/SF_FileSystem.xba
index a0d124da3b5b..3a985b9efee1 100644
--- a/wizards/source/scriptforge/SF_FileSystem.xba
+++ b/wizards/source/scriptforge/SF_FileSystem.xba
@@ -60,7 +60,7 @@ Const cstForReading				=	1
 Const cstForWriting				=	2
 Const cstForAppending			=	8
 
-REM ===================================================== CONSTRUCTOR/DESCTRUCTOR
+REM ===================================================== CONSTRUCTOR/DESTRUCTOR
 
 REM -----------------------------------------------------------------------------
 Public Function Dispose() As Variant
@@ -621,7 +621,7 @@ Public Function DeleteFolder(Optional ByVal FolderName As Variant) As Boolean
 '''		NOTAFOLDERERROR				Argument is a file, not a folder
 '''	Example:
 '''		FSO.FileNaming = "SYS"
-'''		FSO.DeleteFolder("C:\Temp\*")		'	Only solders are deleted, filesin the parent folder are not
+'''		FSO.DeleteFolder("C:\Temp\*")		'	Only olders are deleted, files in the parent folder are not
 
 Dim bDelete As Boolean			'	Return value
 
@@ -1441,7 +1441,7 @@ Public Function PickFile(Optional ByVal DefaultFile As Variant _
 '''	Returns:
 '''		The selected FileName in URL format or "" if the dialog was cancelled
 '''	Example:
-'''		FSO.FineNaming = "SYS"
+'''		FSO.FileNaming = "SYS"
 '''		FSO.PickFile("C:\", "OPEN", "txt")		' Only *.txt files are displayed
 
 Dim oFileDialog As Object		'	com.sun.star.ui.dialogs.FilePicker
@@ -1525,7 +1525,7 @@ Public Function PickFolder(Optional ByVal DefaultFolder As variant _
 '''		The selected FolderName in URL or operating system format
 '''		The zero-length string if the dialog was cancelled
 '''	Example:
-'''		FSO.FineNaming = "SYS"
+'''		FSO.FileNaming = "SYS"
 '''		FSO.PickFolder("C:\", "Choose a folder or press Cancel")
 
 Dim oFolderDialog As Object		'	com.sun.star.ui.dialogs.FolderPicker
@@ -1766,7 +1766,7 @@ Dim bFile As Boolean			'	True if File, False if Folder
 Dim oSfa As Object				'	com.sun.star.ucb.SimpleFileAccess
 Dim bWildCards As Boolean		'	True if wildcards found in Source
 Dim bCreateFolder As Boolean	'	True when the destination folder should be created
-Dim bDestExists As Boolean		'	True if desination exists
+Dim bDestExists As Boolean		'	True if destination exists
 Dim sSourceUrl As String		'	Alias for Source
 Dim sDestinationUrl As String	'	Alias for Destination
 Dim sDestinationFile As String	'	Destination FileName
@@ -2081,4 +2081,4 @@ Dim sFolder As String		'	Folder
 End Function	'	ScriptForge.SF_FileSystem._SFInstallFolder
 
 REM ============================================ END OF SCRIPTFORGE.SF_FileSystem
-</script:module>
\ No newline at end of file
+</script:module>