Changeset 92 for branches/beta/castlib1/alexUtilities.ls

Timestamp:

12/09/07 15:42:39 (4 years ago)

Author:

alex

Message:

buddyApis getfolder returend unixnames

File:

• branches/beta/castlib1/alexUtilities.ls (modified) (2 diffs)

branches/beta/castlib1/alexUtilities.ls

@@ -407 +407 @@
 -- xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
 
-on mGetFolderPathFromUser me
+on mGetFolderPathFromUser me, startFolder, theTitle, flags, instruction, offsx, offsy
   retval = ""
   
@@ -420 +420 @@
     end if
     
-    retval = baGetFolder( "", "Select a folder", 3, "", 50, 50 )
+    startFolder = string(startFolder)
+    instruction = string(instruction)
+    flags = integer(flags)
+    if ilk(flags) <> #integer then flags = 0
+    theTitle = string(theTitle)
+    
+    offsx = integer(offsx)
+    if ilk(offsx) <> #integer then offsx = -1
+    
+    offsy = integer(offsy)
+    if ilk(offsy) <> #integer then offsy = -1
+    
+    retval = baGetFolder(startFolder, theTitle, flags, instruction, offsx, offsy )
     
     if resetUNames = 1 then baReturnUnixNames(1)