Menu
▾
▴
SF.net SVN: frontierkernel: [1745] ODBs/trunk/frontierRoot/system/startup/ startupScript.fvc
|
From: <cre...@us...> - 2007-09-30 23:50:35
|
Revision: 1745
http://frontierkernel.svn.sourceforge.net/frontierkernel/?rev=1745&view=rev
Author: creecode
Date: 2007-09-30 16:50:39 -0700 (Sun, 30 Sep 2007)
Log Message:
-----------
don't hard code program name in user dialogs
changed alert dialog text to user-in-charge text
instead of displaying licenses, we just make sure they're in the application folder
Modified Paths:
--------------
ODBs/trunk/frontierRoot/system/startup/startupScript.fvc
Modified: ODBs/trunk/frontierRoot/system/startup/startupScript.fvc
===================================================================
--- ODBs/trunk/frontierRoot/system/startup/startupScript.fvc 2007-09-30 23:49:22 UTC (rev 1744)
+++ ODBs/trunk/frontierRoot/system/startup/startupScript.fvc 2007-09-30 23:50:39 UTC (rev 1745)
@@ -1,6 +1,11 @@
FrontierVcsFile:3:scpt:system.startup.startupScript
«Changes
+ «9/30/07; 4:46:45 PM by TAC
+ «don't hard code program name in user dialogs
+ «11/3/06; 7:36:49 AM by TAC and ARF
+ «changed alert dialog text to user-in-charge text
+ «instead of displaying licenses, we just make sure they're in the application folder
«7/16/06; 2:26:14 PM by TAC and KW
«changed logic so that the script can be run again if the script failed for some reason, without having to fiddle with tables
«5/19/06; 3:37:07 PM by TAC
@@ -273,6 +278,8 @@
«fileMenu.save ()
+local ( programName = Frontier.getProgramName ( false ) );
+
bundle { // miscellaneous variable initializations and checks, phase 2 of 2
system.menus.data.currentsuite = "";
system.menus.data.currentMenuType = nil;
@@ -281,7 +288,7 @@
bundle { // check for presence of Psapi.dll
if sys.os ( ) == "WinNT" {
if not ( sys.appIsRunning ( file.fileFromPath ( Frontier.getProgramPath ( ) ) ) ) { // 11/27/04; 12:14:40 PM by TAC - would it be possible for Frontier to install this on its own?
- dialog.alert ( "You need to run the Frontier Psapi Installer for certain Frontier verbs to work properly." )}}}};
+ dialog.alert ( programName + " needs you to run the Frontier Psapi Installer for certain " + programName + " verbs to work properly." )}}}};
bundle { // open the about window if the pref says we should
«added 12/16/98; 6:47:28 PM by DW
@@ -443,7 +450,7 @@
if not ( kernelCall ( @name, @initials, @organization, @email ) ) {
return ( false )};
if initials == "" {
- dialog.alert ( "You must specify your initials." );
+ dialog.alert ( programName + " needs the initials of your name." );
infoDialog ( )};
user.prefs.name = name;
user.prefs.initials = initials;
@@ -483,18 +490,35 @@
«window.close ( s )
bundle { // license
- local ( adrWindow = @system.startup.license, sH, sV );
+ local ( adr, f, path = file.getPath ( ) );
- target.set ( adrWindow );
- window.setPosition ( adrWindow, 0, 0 );
- window.setSize ( adrWindow, infinity, infinity );
- window.zoom ( adrWindow );
- window.getSize ( adrWindow, @sH, @sV );
- window.setSize ( adrWindow, sH + 50, sV - 100 );
- window.setPosition ( adrWindow, 50, 100 );
- window.scroll ( down, infinity );
- wp.setSelect ( 0, 0 );
- edit ( adrWindow )}}; // 12/4/04; 9:26:35 PM by TAC - i rather do this near the beginning of phase 1 firstRootRun but had a problem with this window and setting up the quick script window
+ bundle { // license
+ adr = @system.startup.license;
+ f = path + "LICENSE.txt";
+
+ if not ( file.exists ( f ) ) or timeModified ( adr ) > file.modified ( f ) {
+ file.writeWholeFile ( f, string ( adr^ ), 'TEXT', 'LAND' )}};
+
+ bundle { // copying ( GPL )
+ adr = @system.startup.copying;
+ f = path + "COPYING.txt";
+
+ if not ( file.exists ( f ) ) or timeModified ( adr ) > file.modified ( f ) {
+ file.writeWholeFile ( f, string ( adr^ ), 'TEXT', 'LAND' )}};
+ }};
+ «old code
+ «local ( adrWindow = @system.startup.license, sH, sV )
+ «
+ «target.set ( adrWindow )
+ «window.setPosition ( adrWindow, 0, 0 )
+ «window.setSize ( adrWindow, infinity, infinity )
+ «window.zoom ( adrWindow )
+ «window.getSize ( adrWindow, @sH, @sV )
+ «window.setSize ( adrWindow, sH + 50, sV - 100 )
+ «window.setPosition ( adrWindow, 50, 100 )
+ «window.scroll ( down, infinity )
+ «wp.setSelect ( 0, 0 )
+ «edit ( adrWindow ) // 12/4/04; 9:26:35 PM by TAC - i rather do this near the beginning of phase 1 firstRootRun but had a problem with this window and setting up the quick script window
bundle { // build menu bar
system.menus.buildMenuBar ( );
@@ -510,7 +534,7 @@
if flFirstRootRun {
if defined ( system.temp.installer.urlToOpen ) {
- dialog.alert ( "Frontier is going to use your web browser to complete its installation." );
+ dialog.alert ( programName + " needs to use your web browser to complete its installation." );
webBrowser.openUrl ( system.temp.installer.urlToOpen );
webBrowser.bringToFront ( )};
This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.
|
