зеркало из https://github.com/mozilla/gecko-dev.git
45 строки
1.4 KiB
Plaintext
45 строки
1.4 KiB
Plaintext
(*
|
|
* The contents of this file are subject to the Netscape Public License
|
|
* Version 1.1 (the "License"); you may not use this file except in
|
|
* compliance with the License. You may obtain a copy of the License at
|
|
* http://www.mozilla.org/NPL/
|
|
*
|
|
* Software distributed under the License is distributed on an "AS IS" basis,
|
|
* WITHOUT WARRANTY OF ANY KIND, either express or implied. See the License
|
|
* for the specific language governing rights and limitations under the
|
|
* License.
|
|
*
|
|
* The Original Code is Mozilla Communicator client code, released March
|
|
* 31, 1998.
|
|
*
|
|
* The Initial Developer of the Original Code is Netscape Communications
|
|
* Corporation. Portions created by Netscape are Copyright (C) 1999
|
|
* Netscape Communications Corporation. All Rights Reserved.
|
|
*
|
|
* Contributors:
|
|
* Samir Gehani <sgehani@netscape.com>
|
|
*)
|
|
|
|
--------------------------------------------------------------------
|
|
-- GenJSLib TEST HARNESS
|
|
--------------------------------------------------------------------
|
|
|
|
set zFolder to "HD:genJS"
|
|
set src to zFolder & ":install.jst"
|
|
set dst to zFolder
|
|
set ver to "5.0.0.99288"
|
|
|
|
-- load lib
|
|
tell application "Finder"
|
|
load script file "GenJSLib" of folder "genJS" of startup disk
|
|
set zGenJSLib to result
|
|
end tell
|
|
|
|
-- call API
|
|
tell zGenJSLib
|
|
set err to genJSFile(src, dst, ver)
|
|
display dialog "[TEST] genJSFile returned: " & err
|
|
end tell
|
|
|
|
|