|
From: creedon <icr...@us...> - 2005-03-27 23:09:39
|
Update of /cvsroot/frontierkernel/odbs/frontierRoot/system/verbs/builtins/sys In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23601 Modified Files: osName Log Message: use system.environment.osFullNameForDisplay Index: osName =================================================================== RCS file: /cvsroot/frontierkernel/odbs/frontierRoot/system/verbs/builtins/sys/osName,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** osName 26 Mar 2005 19:43:34 -0000 1.1.1.1 --- osName 27 Mar 2005 23:09:30 -0000 1.2 *************** *** 1,3 **** FrontierVcsFile:1:scpt:system.verbs.builtins.sys.osName ! on osName () { case sys.os () { "MacOS" { return ("Macintosh OS")}; "Win95" { return ("Windows 95")}; "WinNT" { return ("Windows NT")}}}; Çbundle Çtest code Çdialog.alert (osName ()) \ No newline at end of file --- 1,3 ---- FrontierVcsFile:1:scpt:system.verbs.builtins.sys.osName ! ÇChanges Ç12/5/04; 8:50:15 PM by TAC Çuse system.environment.osFullNameForDisplay Çold code Çon osName () Çcase sys.os () Ç"MacOS" Çreturn ("Macintosh OS") Ç"Win95" Çreturn ("Windows 95") Ç"WinNT" Çreturn ("Windows NT") on osName () { return (environment.osFullNameForDisplay)}; Çbundle Çtest code Çdialog.alert (osName ()) \ No newline at end of file |