Re: [Scid-users] Bases directory & Books directory

[Pascal G. <pas...@fr...>]

2009/7/24, Israel Chauca Fuentes <isr...@fa...>:
> Hi there!
>
> On Jul 23, 2009, at 11:23 AM, Pascal Georges wrote:
>
>> Strange, maybe a MacOs Tcl/Tk issue. For example the following code
>> works on
>> Linux :
>> ======================
>> package require Tk
>>
>> set scidBooksDir "/what/ever/not/exist"
>> proc setBooksDir {} {
>>  global scidBooksDir
>>  set dir [tk_chooseDirectory -initialdir $scidBooksDir -mustexist 1]
>>  if {$dir == ""} {
>>    return
>>  } else {
>>    set scidBooksDir $dir
>>  }
>> }
>>
>> setBooksDir
>> puts "scidBooksDir $scidBooksDir"
>> ==========================
>>
>> That is, even if the directory does not exist, the initial dir is
>> set to the
>> working directory.
>
> That doesn't work on Aqua but it does on X11 on my Mac. Should an
> existence test be added?

Maybe there two different versions of Tk, and an update is necessary
on Aqua ? I am reluctant to add tests to work around such cases.

>>> If it can help you, the "Startup Window" says, among many other
>>> messages:
>>>
>>> *Warning: unknown option: "-psn_0_217141"*
>>>
>>
>> Not strictly Scid related, I'm afraid. Strange option. Certainly a
>> packaging
>> problem on MacOs.
>
> The attached patch takes care of that.

Ok, patched. But what is the use of -psn ? Why is it necessary on MacOs ?

Pascal