home *** CD-ROM | disk | FTP | other *** search
/ BUG 11 / BUGCD1998_02.ISO / email / sime / sysdflt.tcl < prev    next >
Encoding:
Text File  |  1997-12-09  |  62.8 KB  |  1,638 lines
  1. # MODULE[data]: site_administration_defaults - All platforms, part 1
  2.  
  3. # FUNCTION
  4. # This file is used to provide a base configuration for Simeon.  It
  5. # is loaded everytime Simeon is started up BEFORE a user's configuration
  6. # is loaded.   It is a fatal error for Simeon to not correctly load this 
  7. # file.  See also, documentation in sysdflt2.tcl.
  8. # END FUNCTION
  9.  
  10. # NOTES
  11. #
  12. # For release 4.1.2, parts of this file have been moved to sysdflt2.tcl due
  13. # to a file size limitation in the Win16 TCL interpreter.  See sysdflt2.tcl
  14. # for more information.
  15. #
  16. # This file has two main uses: provide default information for user's so
  17. # that they don't have to configure it themselves, and provide
  18. # administrative configuration that cannot be overridden by the user.
  19. #
  20. # The file is a Tool Command Language (TCL) file that contains a set of
  21. # "option" commands.  The "option" command is a Simeon extension to TCL
  22. # that supports updating the content of the Simeon runtime option
  23. # (configuration) database.  The file can contain any of the standard
  24. # TCL commands and statements.
  25. #
  26. # Options are defined using the following syntax:
  27. #
  28. #  "option [-default | -permanent | -session] [-readonly] {name} [{value}]
  29. #
  30. # where arguments in the [] are optional, and arguments in {} are
  31. # variables that are provided by you.  If just the option {name} is
  32. # provide with no {value}, then value of the option is returned.  If the
  33. # {name} and {value} are provided, then the value is stored in the
  34. # runtime option database.
  35. # 
  36. # Options can be stored in one of three levels: default, permanent, and
  37. # session.  When options are referenced in the repository, a session
  38. # value is retrieved ahead of a permanent value, and a permanent value
  39. # is retrieved ahead of a default value.  Therefore, a session value
  40. # will "mask" a permanent value which will "mask" a default value.  Only
  41. # permanent values are saved from the option database to the user's
  42. # permanent option repository. If no level is specified the default
  43. # is permanent.
  44. # 
  45. # Usually, an administrator will set all options defined in this 
  46. # file to be level "default".   This will allow the user to define
  47. # permanent and session options that will be used in preference to
  48. # the default value.   If the administrator wants to make sure that
  49. # a value is used no matter what, then the option can be set
  50. # "readonly" which will keep any other value from being stored
  51. # into the database for that option.   For example, message service
  52. # definitions that the user wants to enforce would be made readonly,
  53. # and any attempt by the user to delete the message service in
  54. # Simeon would result in failure.
  55. # 
  56. # Some examples:
  57. #
  58. # option -default  MsgService.IDList "1 2"
  59. # option -default -readonly MsgService.ms1.Name "Post Office"
  60. # option -default MsgService.ms2.Name "News Stand"
  61. #
  62. # Setting these options would create two message services (only
  63. # partially defined for the example) named "Post Office" and
  64. # "News Stand".   The user would be allowed to delete or rename
  65. # "News Stand", but they would not be able to do either to "Post
  66. # Office".
  67. #
  68. # Site Defaults file sysdflt2.tcl:
  69. #
  70. # 2nd site defaults file has been created (sysdflt2.tcl) which 
  71. # contains the Helper Applications and the Column Manager settings.
  72. # (This was due to a 65K file size limitation for the TCL 
  73. # interpreter on Win16)
  74. #
  75. # Installation data file install.dat:
  76. #
  77. # sysdflt.tcl looks for install.dat file in the Simeon program 
  78. # directory which indicates the folder prefix/location setting. 
  79. # This file will be created by the Simeon 4.1.2 installer on all 
  80. # platforms and has the following format:
  81. #
  82. # guest=["yes" | "no"]
  83. # server=["Default" | "Simeon IMAP4" | "Washington Berkeley" | 
  84. # "Washington Black Box" | "Sun Solstice" | "VMS with PMDF" | 
  85. # "Netscape"]
  86. #
  87. # guest indicates whether Simeon is to be configured for a guest 
  88. # account on our demo server. This may be omitted if you are 
  89. # creating this file manually.
  90. #
  91. # server indicates the  server type and may be one of the 7 
  92. # settings shown. 
  93. #
  94. # Accessor functions:
  95. #
  96. # The following functions have been added to the TCL interpreter 
  97. # for use in the sysdflt and startup TCL files:
  98. #
  99. # debug_trace        - writes string to the debug.txt file in the Simeon 
  100. #                      user working directory
  101. # change_debug_level - changes the debug level inside Simeon to 
  102. #                      begin c-client logging immediately. This
  103. #                      allows for the debugging of connection
  104. #                      problems on startup
  105. # note               - displays the string in a dialog with an OK button
  106. # work_dir           - returns the full path to the Simeon user 
  107. #                      working directory
  108. # appl_dir           - returns the full path to the Simeon program directory
  109. # install_datafile   - returns full path and filename of the install.dat
  110. #                      file
  111. # platform           - returns the OS platform as one of:
  112. #                      "windows", "windows32", "mac", "motif"
  113. # screen_size        - returns the dimensions of the workstation display
  114. #                      (ie. "800 600", "640 480" etc.)
  115. # demo_client        - returns "yes" if the software is the evaluation
  116. #                      release, "no" otherwise
  117. #
  118. # END NOTES
  119. #
  120. # HISTORY
  121. # IncrDev Dec  4, 1997 by ll: updated version number to 4.1.4
  122. # IncrDev Oct 20, 1997 by ll: added missing option, Editor.WrapPaste
  123. # IncrDev Sep 30, 1997 by ll: added Folder.EnableRemote, Folder.EnableLocal options
  124. # IncrDev Sep 30, 1997 by ll: added AddrBook.EnableRemote, AddrBook.EnableLocal options
  125. # IncrDev Sep 26, 1997 by ll: added AddrBook.SearchFlagDefault and AddrBook.LocationDefault
  126. # IncrDev Sep 24, 1997 by ll: updated version number, put $guest tests back in
  127. #                             for 4.1.3
  128. # IncrDev Sep 15, 1997 by ll: replaced all tests of $demo with $guest as the
  129. #                             demo_client routine does not work in 4.1.2.,
  130. #                             always returns 'no'. This is fixed in 4.1.3.
  131. # IncrDev Sep 09, 1997 by kew: implemented new default rules for draft and
  132. #                              sentmail folders based on the guest variable.
  133. # IncrDev Aug 18, 1997 by ll: added Mac/Motif General.Mobile option, it was
  134. #                             missed when the files were merged
  135. # Doc     Jul 15, 1997 by ll: added doc on canonical names for default folders
  136. # IncrDev Jul 15, 1997 by ll: changed default specification for default folders
  137. #                             to refer to MsgService.ms? options names rather
  138. #                             than use literal strings
  139. # IncrDev Jul 14, 1997 by ll: moved FONTS AND COLORS section to sysdflt2.tcl
  140. # Doc     Jul 14, 1997 by ll: added more doc throughout, mostly for option
  141. #                             value settings
  142. # IncrDev Jul 14, 1997 by ll: added change_debug_level doc and call
  143. # IncrDev Jul 11, 1997 by ll: added documentation on accessor functions to NOTES
  144. #                             changed server initialization to "Default"
  145. # IncrDev Jul 11, 1997 by ll: changed the Default folder prefix to 
  146. #                             blank, to match previous sysdflt.tcl
  147. # IncrDev Jul 11, 1997 by ll: added sysdflt_version variable
  148. # IncrDev Jul 10, 1997 by ll: split this into a second file sysdflt2.tcl
  149. #                             because this grew too big for win16
  150. # IncrDev Jul 10, 1997 by ll: extensive changes to incorporate the
  151. #                             install.dat file and to combine
  152. #                             all sysdflt.{pltfrm} files into one
  153. # IncrDev Jun 25, 1997 by ll: changed various option values from
  154. #                             lowercase to capitalized
  155. # IncrDev May 28, 1997 by jps: fixed Unix print command, added comment
  156. # IncrDev May 13, 1997 by ll: added AUTHENTICATION section for Solstice
  157. #                             and Netscape IMAP4 servers.
  158. # IncrDev Mar 27, 1997 by ll: changed default for Viewer.ActionDelete
  159. #                             from "next" to "Next" as "next" was not
  160. #                             recognized
  161. #                             modified search criteria for Read Receipts
  162. #                             message group to contain "read receipt"
  163. # IncrDev Mar 12, 1997 by ll: modified doc for TR subject option
  164. # IncrDev Mar 12, 1997 by ll: added General.TroubleReportSubject option
  165. # IncrDev Feb 28, 1996 by ll: replaced xterm -e vi with vi as default
  166. #                             Text/Plain viewer for Unix. Command line
  167. #                             arguments are not accepted yet
  168. # IncrDev Feb 27, 1997 by ll: changed Post Office Folder Location and
  169. #                             Folder Prefix defaults from "~/" to "" (blank)
  170. # IncrDev Feb 27, 1997 by ll: modified trouble report address to point
  171. #                             to eval
  172. #                             commented out OutboxFolder
  173. #                             added discussion on Next and Previous
  174. #                             for ActionDelete options
  175. # IncrDev Feb 10, 1997 by ll: revised doc in Trouble Report, removed
  176. #                             beta address
  177. # IncrDev Feb 10, 1997 by ll: expanded Folder Location/Prefix discussion
  178. #                             removed old Logging options
  179. # IncrDev Jan 21, 1997 by ll: changed ReadReceipt policy to "Prompt"
  180. #                             added -default to SepPosn and Colman options
  181. # IncrDev Jan 16, 1997 by ll: turned on Windows Helper App examples
  182. # IncrDev Dec 23, 1996 by ll: added new options for 4.1
  183. # IncrDev Nov 27, 1996 by kw: commented 2nd line of next comment (oops)
  184. # IncrDev Nov 27, 1996 by kw: changed values of WinPosn defaults to resolve
  185. #                             line 0 problem
  186. # IncrDev Nov 21, 1996 by rr: added Options.MandatoryRemote to force
  187. #                             IMSPlogins
  188. # IncrDev Nov 13, 1996 by rr: added General.BetaAddress
  189. # IncrDev Oct 24, 1996 by cy: added General.DeliveryRules
  190. # IncrDev Aug  5, 1996 by ll: fixed option name for second message
  191. #                             service port from ms1.Port to ms2.Port
  192. # IncrDev May 13, 1996 by ll: updated Macintosh window positions.
  193. # IncrDev May 13, 1996 by ll: changed Macintosh default fonts from 10 to
  194. #                             9 point
  195. # IncrDev May  6, 1996 by ll: commented out PageLayout.Footer option so that
  196. #                             startup.tcl file can set it instead
  197. # IncrDev May  1, 1996 by ll: change default MDI behavior to ON
  198. # IncrDev Mar 19, 1996 by ll: changed drafts and sentmail to local
  199. #                             changed save outgoing to false
  200. #                             changed expand on send to OFF
  201. # IncrDev Mar 14, 1996 by ll: added documentation and rearranged order
  202. #                             to be more logical
  203. # IncrDev Feb 29, 1996 by ll: move AddrBook.Hostname and
  204. #                             General.DeliveryHost to the beginning of
  205. #                             file to group them under the user startup
  206. #                             questions
  207. # IncrDev Feb 04, 1996 by rr: add ms windows mdi switch
  208. # IncrDev Feb  1, 1996 by ll: added FolderLocation, modified FolderPrefix
  209. # IncrDev Jan 24, 1996 by ll: added examples of viewers for all platforms
  210. # IncrDev Jan 23, 1996 by ll: changed default port number for PassWord Mgr
  211. #                             from 8001 to 8000 on recommendation from JP
  212. # IncrDev Jan 15, 1996 by sh: added General.ReadReceiptPolicy admin option
  213. # IncrDev Dec 28, 1995 by ll: added Macintosh specific defaults
  214. # IncrDev Dec 18, 1995 by ll: updated for version 4.0
  215. # Doc____ Oct 30, 1995 by sh: first cut of new documentation (rather poor)
  216. # IncrDev Oct 30, 1995 by sh: added -default and -readonly support
  217. # IncrDev Aug 28, 1995 by sh: updated for Capricorn release
  218. # IncrDev Aug 4, 1995 by gc: updated for demo release
  219. # IncrDev May 19, 1995 by sh: updated for 3.0.2 release
  220. # END HISTORY
  221.  
  222. # SYSDFLT DEBUG LOGGING
  223.  
  224. # To turn on debug logging in this file set the following variable
  225. # to "yes". All debug_trace stmts will be written to the debug.txt file
  226. # in the Simeon working directory.
  227.  
  228. set sdlog "no"
  229.  
  230. # END SYSDFLT DEBUG LOGGING
  231.  
  232. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : begin"}
  233.  
  234. # To turn on c-client logging from this point on, uncomment the
  235. # following line. This is equivalent to setting Log Detail to All
  236. # and C-client as the Subsystem to Log under Tools->Options->Edit->Logging.
  237. # This allows us to debug startup connection problems on a mandatory remote
  238. # startup, or a restoration of the desktop on startup requiring a remote 
  239. # connection.
  240.  
  241. #change_debug_level all 256
  242.  
  243. # SYSDFLT VERSION
  244.  
  245. # Version string for the sysdflt file. 
  246.  
  247. set sysdflt_version "4.1.4"
  248. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : Version $sysdflt_version"}
  249.  
  250. # END SYSDFLT VERSION
  251.  
  252. # PROCS
  253.  
  254. # Procedure definitions
  255.  
  256. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : PROCS"}
  257.  
  258. proc getInstallData {} {
  259.  
  260.    global guest
  261.    global server
  262.    global sdlog
  263.  
  264.    if {$sdlog == "yes"} {debug_trace "getInstallData : proc entry"}
  265.  
  266.    catch {set install_file [install_datafile]}
  267.    if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : install_datafile = $install_file"}
  268.  
  269. # Read the file created by the install program to see if we
  270. # are setting up a guest account and what to set the folder
  271. # prefix to
  272.  
  273.    if {[file exists $install_file]} {  
  274.       if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : Opening $install_file"}
  275.       set f [open $install_file r]
  276.       if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : Opened $install_file"}
  277.       while {[gets $f line] >= 0} {
  278.          if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : line = $line"}
  279.      regexp "(\[^=]+)=\"(\[^\"]+)" $line junk varkey varval
  280.          if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : varkey is: $varkey, varval is: $varval"}
  281.          if {$varkey == "guest"} {
  282.             set guest $varval
  283.             if {$sdlog == "yes"} {debug_trace "getInstallData : guest = $guest"}
  284.          } elseif {$varkey == "server"} {
  285.             set server $varval
  286.             if {$sdlog == "yes"} {debug_trace "getInstallData : server = $server"}
  287.          }
  288.       }
  289.       close $f
  290.    } else {
  291.       if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : $install_file does not exist"}
  292.       set guest "no"
  293.       set server "Default"
  294.    }
  295.  
  296.    if {$sdlog == "yes"} {
  297.       debug_trace "getInstallData : guest = $guest, server = $server"
  298.       debug_trace "getInstallData : end"
  299.    }
  300.  
  301. }
  302.  
  303. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : END PROCS"}
  304.  
  305. # END PROCS
  306.  
  307. # INITIALIZATIONS
  308.  
  309. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : INITIALIZATIONS"}
  310.  
  311. # Call platform accessor function to set the platform variable.
  312. # Can be one of "mac", "motif", "windows" or "windows32"
  313.  
  314. set pltfrm ""
  315. catch {set pltfrm [platform]}
  316. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : Platform = $pltfrm"}
  317.  
  318. # Call demo_client accessor function to set the demo variable.
  319. # setting will be "yes" or "no"
  320.  
  321. set demo ""
  322. catch {set demo [demo_client]}
  323. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : Demo = $demo"}
  324.  
  325. # Call screen_size to give us the size of the current screen
  326.  
  327. set scrsize ""
  328. catch {set scrsize [screen_size]}
  329. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : screen size = $scrsize"}
  330.  
  331. # Initialize the guest and server type variables in case
  332. # there is no install.dat file
  333.  
  334. set guest "no"
  335. set server "Default"
  336.  
  337. # Call getInstallData to read install.dat
  338.  
  339. getInstallData 
  340.  
  341. if {$sdlog == "yes"} {
  342.    debug_trace "sysdflt.tcl : Guest = $guest"
  343.    debug_trace "sysdflt.tcl : server Type = $server"
  344. }
  345.  
  346. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : END INITIALIZATIONS"}
  347.  
  348. # END INITIALIZATIONS
  349.  
  350. # STARTUP DEFAULTS
  351.  
  352. # Defaults for the new user startup dialog (startup.tcl)
  353.  
  354. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : STARTUP DEFAULTS"}
  355.  
  356. # Mail domain will be defaulted into the email address question on startup
  357. # If this field contained "simeon.com" then the user would see "@simeon.com"
  358. # when prompted for his email address.
  359. # If a guest account requested, set the mail domain to ESYS
  360. # demo server
  361. #
  362.  
  363. if {$guest == "no"} {
  364. option -default General.MailDomain ""
  365. } else {
  366. option -default General.MailDomain "demo.simeon.com"
  367. }
  368.  
  369. # This specifies the preferred machine used to send new mail messages.
  370. # It should be running an SMTP server.
  371. # By default, the startup.tcl file prompts the user for the SMTP
  372. # hostname (proc verifySMTPHost). It uses the value here as the default
  373. # prompt.
  374. # If the hostname value here is correct and does need to be modified by the
  375. # user, the startup question can be omitted. See startup.tcl for more
  376. # information.
  377.  
  378. #
  379. # If a guest account requested, set delivery host to ESYS demo server
  380. #
  381. if {$guest == "no"} {
  382. option -default General.DeliveryHost "mailhost"
  383. } else {
  384. option -default General.DeliveryHost "\[198.161.92.131\]"
  385. }
  386.  
  387. # Delivery (SMTP) host TCP port number. By default, the user is not prompted
  388. # for this information from startup.tcl
  389.  
  390. option -default Send.TCPPort "25"
  391.  
  392. # Address book information can be held in an IMSP database.  The
  393. # hostname for the server may be specified here. This should be the
  394. # host name of an IMSP server on which users have valid accounts.
  395. # By default this is empty  because a value in this field indicates
  396. # to Simeon that an IMSP host is available and Simeon will search for
  397. # remote address books when the address book module is started up.
  398. # Leaving this field blank will cause Simeon to skip the remote book
  399. # search and search for local books only.
  400. # If the addressbook host name is set here and does not need to be
  401. # changed by the user, you can remove the Address book prompt from the
  402. # startup.tcl file. See startup.tcl for more information.
  403.  
  404. #
  405. # If a guest account requested, set address book host to ESYS demo server
  406. #
  407. if {$guest == "no"} {
  408. option -default AddrBook.Hostname ""
  409. } else {
  410. option -default AddrBook.Hostname "\[198.161.92.131\]"
  411. }
  412.  
  413. # Address Book (IMSP) host TCP port number. By default, the user is not
  414. # prompted for this information from startup.tcl
  415.  
  416. option -default AddrBook.TCPPort "406"
  417.  
  418. # : Default the IMSP options hostname to that given for the Address book
  419. # : with the assumption that the the same IMSP host will be used for both.
  420. # : If no IMSP host then these options will just be blank.
  421.  
  422. option -default Options.RemoteHost [option AddrBook.Hostname]
  423. option -default Options.RemotePort [option AddrBook.TCPPort]
  424.  
  425. # This enables the site administrator to FORCE IMSP authenticated logins
  426. # to the IMSP server. Simeon will exit if the login fails. This
  427. # functions across all platforms.
  428. # The default is not to require a remote IMSP login on startup.
  429. #
  430. # NOTE: Do not set this to TRUE unless the RemoteHost and RemotePort
  431. # have been set here in the sysdflt.tcl file. Simeon must read the
  432. # hostname and port from here in order to be able to force a first-time
  433. # login to IMSP.
  434.  
  435. option -session Options.MandatoryRemote "FALSE"
  436.  
  437. # This specifies whether the user will be using delivery rules
  438. # with Simeon.  User must have IMSP running. This option is not
  439. # yet in use. Please leave set to FALSE.
  440.  
  441. option -default General.DeliveryRules "FALSE"
  442.  
  443. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : END STARTUP DEFAULTS"}
  444.  
  445. # END STARTUP DEFAULTS
  446.  
  447.  
  448. # MESSAGE SERVICES
  449.  
  450. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : MESSAGE SERVICES"}
  451.  
  452. # A message service is the entity which allows you to access your
  453. # inbox and other mail folders. 
  454. # There are three defined here, a Post Office, a News Stand
  455. # and a local message service.
  456. #
  457. # For each message services specify the following:
  458. #
  459. #   - Name (user friendly name of the message service)
  460. #   - Type (mail,bboard, or local)
  461. #   - Hostname (the host running the IMAP server,n/a for local)
  462. #   - Port (IMAP port number, defaults to 143)
  463. #   - Folder Prefix
  464. #     Used when creating new folders.  This represents where a 
  465. #     new folder is to be created within the Message Service. 
  466. #     With respect to the Simeon IMAP4 server, 'INBOX.' is 
  467. #     equivalent to 'user.{username}.'
  468. #   - Folder Location
  469. #     Folder Location tells Simeon where in the Message Service 
  470. #     to find the folders to display.  This may be a comma 
  471. #     delimited list of several locations.
  472. #
  473. #
  474. #   - Userid (userid to use to connect, will prompt if omitted)
  475. #
  476.  
  477. #
  478. # Header to indicate the number of message services defined.
  479. #
  480. option MsgService.IDList "1 2 3"
  481.  
  482. #
  483. # IMAP Mail Message Service
  484. #
  485. option MsgService.ms1.Name "Post Office"
  486. option MsgService.ms1.Type "mail"
  487.  
  488. # By default, the startup.tcl file prompts the user for the Post Office
  489. # hostname (proc verifyMailHost). It uses the value here as the default
  490. # for the display.
  491. # If the hostname value here is correct and does need to be modified by the
  492. # user, the startup question can be omitted. See startup.tcl for more
  493. # information.
  494.  
  495. #
  496. # If a guest account requested, set post office host to ESYS demo server
  497. #
  498. if {$guest == "no"} {
  499. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : setting default hostname"}
  500. option MsgService.ms1.Hostname "mailhost"
  501. } else {
  502. # If the install program has indicated that the user wishes a guest account
  503. # we point the message service to our demo server.
  504. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : setting hostname for demo server"}
  505. option MsgService.ms1.Hostname "\[198.161.92.131\]"
  506. }
  507.  
  508. #
  509. #      The Folder Prefix and Location fields exist in Simeon
  510. #      because of the varying nature of the 'personal' and 'group'
  511. #      namespaces in the different IMAP servers.  Typically, the
  512. #      actual format and location of mail messages and mail
  513. #      folders on the server is very non-intuitive to the average
  514. #      mail user.  Simeon uses the Folder Prefix and Location
  515. #      fields to represent the user's mail folders in a uniform
  516. #      and consisent manner regardless of the underlying
  517. #      configuration supported by the IMAP server.
  518. #
  519. #      In reference to the Simeon IMAP4 server the default settings
  520. #      represent the following:
  521. #
  522. #      'INBOX.' - find all of the user's folders in the user's 
  523. #                 name space i.e. user.{username}.  If INBOX. is
  524. #                 not specified, you will only see your inbox 
  525. #                 (incoming mail) folder and none of your
  526. #                 personally created folders.
  527. #
  528. #      'user.'  - find all other users' folders to which
  529. #                 the user has been granted permission.  If user.
  530. #                 is not specified you will only be able to see
  531. #                 your own folders and no folders owned by others
  532. #                 to which you have been given permission.
  533. #
  534. #      The strings in this field are also stripped from the 
  535. #      Message Organizer display in order to make the folder list 
  536. #      'flatter' by one level.  You can see this by removing both
  537. #      INBOX. and user. from the Folder Location.  This results in 
  538. #      2 folders at the top level: 'inbox' and 'user'. Under inbox 
  539. #      you will find all of your incoming mail as well as your 
  540. #      personally created folders, displayed as subfolders (This 
  541. #      very closely resembles how the mail is actually stored on 
  542. #      the server.)
  543. #      The 'user' folder will contain the top-level list of other 
  544. #      users' folders to which you have permission. 
  545. #      
  546. #     See the following for the common settings for Folder 
  547. #     Prefix and Folder Location based on IMAP server type:
  548. #     $server is set via the install program in install.tcl
  549.  
  550. if {$server == "Washington Berkeley" } {
  551.  
  552. option MsgService.ms1.FolderPrefix "~/Mail/"
  553. option MsgService.ms1.FolderLocation "~/Mail/"
  554.  
  555. } elseif {$server == "Washington Black Box" } {
  556.  
  557. option MsgService.ms1.FolderPrefix "~/"
  558. option MsgService.ms1.FolderLocation "~/"
  559.  
  560. } elseif {$server == "Default"} {
  561.  
  562. # This option is taken when the user chooses the default folder
  563. # prefix during the install. Change these to the default for your
  564. # site.
  565.  
  566. option MsgService.ms1.FolderPrefix ""
  567. option MsgService.ms1.FolderLocation ""
  568.  
  569. } elseif {$server == "Simeon IMAP4"} {
  570.  
  571. option MsgService.ms1.FolderPrefix "INBOX."
  572. option MsgService.ms1.FolderLocation "INBOX.,user."
  573.  
  574. } elseif {$server == "Sun Solstice"} {
  575.  
  576. option MsgService.ms1.FolderPrefix ""
  577. option MsgService.ms1.FolderLocation ""
  578.  
  579. } elseif {$server == "Netscape"} {
  580.  
  581. option MsgService.ms1.FolderPrefix ""
  582. option MsgService.ms1.FolderLocation ""
  583.  
  584. } elseif {$server == "VMS with PMDF"} {
  585.  
  586. option MsgService.ms1.FolderPrefix ""
  587. option MsgService.ms1.FolderLocation ""
  588.  
  589. } else {
  590. # Unknown server type, leave them blank
  591.  
  592. option MsgService.ms1.FolderPrefix ""
  593. option MsgService.ms1.FolderLocation ""
  594. } 
  595.  
  596. option MsgService.ms1.Port "143"
  597. option MsgService.ms1.Userid ""
  598.  
  599. #
  600. # IMAP News Message Service
  601. #
  602. option MsgService.ms2.Name "News Stand"
  603. option MsgService.ms2.Type "bboard"
  604. #
  605. # If the install program indicates that the user wishes a guest
  606. # account, we set it up to point to our demo server
  607.  
  608. if {$guest == "no"} {
  609. option MsgService.ms2.Hostname "newshost"
  610. } else {
  611. option MsgService.ms2.Hostname "\[198.161.92.131\]"
  612. }
  613.  
  614. option MsgService.ms2.Port "143"
  615. option MsgService.ms2.FolderPrefix ""
  616.  
  617. # Select the newsgroups that you want included in subscription lists
  618.  
  619. option MsgService.ms2.FolderLocation "ab,can,comp,edm,gnu"
  620. option MsgService.ms2.Userid ""
  621.  
  622. #
  623. # LOCAL Mail Message Service
  624. #
  625. option MsgService.ms3.Name "Local Folders"
  626. option MsgService.ms3.Type "local"
  627. option MsgService.ms3.Hostname "Local Workstation"
  628. option MsgService.ms3.FolderPrefix ""
  629.  
  630. # If left blank (recommended) folder location will default to the Simeon
  631. # user (working) directory
  632.  
  633. option MsgService.ms3.FolderLocation ""
  634. option MsgService.ms3.Userid ""
  635.  
  636. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : END MESSAGE SERVICES"}
  637.  
  638. # END MESSAGE SERVICES
  639.  
  640. # DEFAULT FOLDERS
  641.  
  642. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : DEFAULT FOLDERS"}
  643.  
  644. # Note: The following options are not available from the
  645. # Tools->Options->Edit menu.
  646. #
  647. # These options indicate whether to allow the creation of 
  648. # local and/or remote folders.
  649. # If set to "TRUE" (default) the user will be allowed to create
  650. # new folders at the specified location.
  651. # Note that it is not an error for both to be set to "FALSE"
  652. # as a site may wish users to have access to shared IMAP
  653. # folders but at the same time, prevent them from
  654. # creating their own new folders, either remotely or locally.
  655. #
  656. # Additional Note: If folders already exist at the location which
  657. # is disabled, the user will be able to access those folders
  658. # as they normally would. These options, when set to FALSE, merely
  659. # prevent the creation of NEW folders at the location.
  660.  
  661. option -default Folders.EnableRemote "TRUE"
  662. option -default Folders.EnableLocal  "TRUE"
  663.  
  664. # The syntax for the default folder option values is as follows:
  665. #
  666. # "{MsgServiceName}!{FolderPrefix}{FolderName}"
  667. # 
  668. # You can specify the name literally as shown in the following examples:
  669. #
  670. # Example 1: "Local Folders!outbox"
  671. # Example 2: "Post Office!~/Mail/drafts"
  672. # Example 3: "Post Office!INBOX.sentmail"
  673. #
  674. # or you can use the following syntax to refer to the MsgService.ms?. option values
  675. # as they are defined above (recommended):
  676. #
  677. # Example 1: "[option MsgService.ms3.Name]![option MsgService.ms3.FolderPrefix]outbox"
  678. # Example 2: "[option MsgService.ms1.Name]![option MsgService.ms1.FolderPrefix]drafts"
  679. # Example 3: "[option MsgService.ms1.Name]![option MsgService.ms1.FolderPrefix]sentmail"
  680. #
  681. # Example 2 assumes that MsgService.ms1.FolderPrefix is set to "~/Mail/"
  682. # and Example 3 assumes that MsgService.ms1.FolderPrefix is "INBOX."
  683. #
  684. # Drafts and Sentmail
  685. #
  686. # The 'drafts' folder is a folder designated to hold unfinished mail
  687. # which has not yet been sent to the recipient. The user saves mail
  688. # to the drafts folder by explicitly invoking the Save to Drafts option.
  689. #
  690. # The 'sentmail' folder is a folder designated to hold copies of mail which have been
  691. # sent to the recipient. (Do not confuse this folder with the queued messages or 'outbox'
  692. # folder discussed in the following section.) The user indicates that he wishes to
  693. # keep a copy of mail sent via the Compose Options window or Tools->Options->Compose.
  694. #
  695. # By default, the drafts and sentmail folders are defined based on whether the guest variable
  696. # is set to "yes" (remote) or not (local).
  697. #
  698. # To set the drafts and sentmail options to point to the local message service specified above,
  699. # use ms3 as shown:
  700.  
  701. #option -default Compose.DraftFolder "[option MsgService.ms3.Name]![option MsgService.ms3.FolderPrefix]drafts"
  702. #option -default Compose.SentmailFolder "[option MsgService.ms3.Name]![option MsgService.ms3.FolderPrefix]sentmail"
  703.  
  704. # Remote folder drafts and sentmail configuration
  705. #
  706. # An alternative is to simply place the mail folders directly in the
  707. # the user's home directory on the server. ie. "~/drafts".
  708. # This is especially useful on dedicated mail servers
  709. # that run a "Black Box" message store -- where only mail folders are
  710. # allowed on the server and there are no interactive user logins.
  711. #
  712. # To default the drafts and sentmail folders to the remote message service
  713. # (Post Office) use ms1 as shown:
  714.  
  715. #option -default Compose.DraftFolder "[option MsgService.ms1.Name]![option MsgService.ms1.FolderPrefix]drafts"
  716. #option -default Compose.SentmailFolder "[option MsgService.ms1.Name]![option MsgService.ms1.FolderPrefix]sentmail"
  717.  
  718. # Default configuration for drafts and sentmail configuration
  719. #
  720. # By default, a guest user will be have their draft and sentmail folders set
  721. # set for the remote message service (on the server).  All others will have
  722. # their draft and sentmail folders set for their local message service (in
  723. # their working directory).  (The $guest variable is read from the install.dat file).
  724. #
  725. # To disable these defaults, comment out the following lines, and uncomment the
  726. # above desired message service.
  727.  
  728. if { $guest == "yes" } {
  729. option -default Compose.DraftFolder "[option MsgService.ms1.Name]![option MsgService.ms1.FolderPrefix]drafts"
  730. option -default Compose.SentmailFolder "[option MsgService.ms1.Name]![option MsgService.ms1.FolderPrefix]sentmail"
  731. } else {
  732. option -default Compose.DraftFolder "[option MsgService.ms3.Name]![option MsgService.ms3.FolderPrefix]drafts"
  733. option -default Compose.SentmailFolder "[option MsgService.ms3.Name]![option MsgService.ms3.FolderPrefix]sentmail"
  734. }
  735.  
  736. # Outbox
  737. #
  738. # The 'outbox' or queued messages folder is where messages are put when using 
  739. # background delivery or when sending mail in offline mode. The messages are
  740. # placed in this folder until the user requests that they be sent. 
  741. # Background delivery can be selected by the user as the default
  742. # delivery mode, or it is automatically set if foreground delivery
  743. # fails.  For this reason, the outbox folder must always be a local
  744. # folder.
  745. #
  746. # This option has been commented out because it causes an error to be
  747. # displayed at startup when it is defined and the outbox does not yet exist.
  748. # This will be the case for any new user of Simeon.  Any previous user
  749. # who has specified an outbox folder will have already have this
  750. # option in their personal options file.
  751.  
  752. #option -default General.OutboxFolder "[option MsgService.ms3.Name]![option MsgService.ms3.FolderPrefix]outbox"
  753.  
  754. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : END DEFAULT FOLDERS"}
  755.  
  756. # END DEFAULT FOLDERS
  757.  
  758. # AUTHENTICATION (Solstice and Netscape IMAP4 servers)
  759.  
  760. # Simeon 411 working with Solstice and Netscape IMAP4 servers requires
  761. # disabling of the unsupported IMAP "AUTHENTICATE" command by
  762. # setting the following option to "ON". This forces the Simeon client to 
  763. # attempt the clear text userid/password LOGIN mechanism only.
  764. #
  765. # To disable Simeon from attempting to authenticate via the IMAP
  766. # AUTHENTICATE command, set this option to "ON" (default).
  767. #
  768. # To allow Simeon to attempt the AUTHENTICATE command, set the
  769. # option to "OFF".
  770.  
  771. option -default  General.NoIMAPAuth "ON"
  772.  
  773. # The following option allows the site administrator to configure
  774. # Simeon so that it will not attempt a clear text userid/password
  775. # LOGIN. If this option is set to "ON" it forces Simeon to make a
  776. # connection via the IMAP AUTHENTICATE mechanism. If the IMAP
  777. # AUTHENTICATE command fails, Simeon will NOT attempt the LOGIN
  778. # command and the user will be unable to connect.
  779. #
  780. # To allow Simeon to attempt the clear text userid/password LOGIN
  781. # command, set this option to "OFF" (default).
  782. #
  783. # To disable Simeon from attempting the clear text userid/password LOGIN
  784. # set this option to "ON".
  785.  
  786. option -default General.NoIMAPLogin "OFF"
  787.  
  788. # NOTE:
  789. # It is an error to set both of these options to "ON". This error will be
  790. # reported when Simeon attempts to open an IMAP connection.
  791.  
  792. # END AUTHENTICATION
  793.  
  794. # MESSAGE GROUPS
  795. # Message groups allow you to group messages in together based on
  796. # criteria such as subject, author etc. They are specified on a
  797. # per folder basis, identified by the Message Service number and
  798. # the folder name.  You may want to define some default message groups
  799. # if you feel it is appropriate for your users. When creating message
  800. # groups, specify the following:
  801. #
  802. # Name    - Name of the group displayed in the folder
  803. # Fields  - message header fields to match, valid values:
  804. #           Subject    Reply-To
  805. #           From       In-Reply-To
  806. #           To         Recipient
  807. #           Cc         All
  808. # Pattern - pattern to match
  809. #           *pattern* - Contains
  810. #           *pattern  - Starts with
  811. #           pattern*  - Ends with
  812. #           pattern   - Is (exact match)
  813. # Sort    - the order to sort the messages, valid values:
  814. #           Most Recent Arrival
  815. #           Least Recent Arrival
  816. #           Most Recent Date Sent
  817. #           Least Recent Date Sent
  818. #           From
  819. #           Subject
  820. # Hide If Empty - whether to remove the group header from the display if
  821. #                 it contains no messages.
  822. #
  823.  
  824. # Header, to identify the number of message groups for the inbox folder
  825. option MessageGroups.1.inbox.IDList "1 2"
  826.  
  827. option MessageGroups.1.inbox.1.Name "Phone Messages"
  828. option MessageGroups.1.inbox.1.Fields "Subject"
  829. option MessageGroups.1.inbox.1.Pattern "*Phone Message*"
  830. option MessageGroups.1.inbox.1.Sort "Most Recent Arrival"
  831. option MessageGroups.1.inbox.1.HideIfEmpty "OFF"
  832.  
  833. option MessageGroups.1.inbox.2.Name "Read Receipts"
  834. option MessageGroups.1.inbox.2.Fields "Subject"
  835. option MessageGroups.1.inbox.2.Pattern "*read receipt*"
  836. option MessageGroups.1.inbox.2.Sort "Most Recent Arrival"
  837. option MessageGroups.1.inbox.2.HideIfEmpty "OFF"
  838.  
  839. # END MESSAGE GROUPS
  840.  
  841. # WINDOW POSITIONS
  842.  
  843. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : WINDOW POSITIONS"}
  844.  
  845. # The {platform}Posn option tells Simeon the default location and size of
  846. # the top level application windows.
  847. #
  848. # Syntax: Option {platform}Posn.{windowname}.Border "Left,Top,Right,Bottom"
  849. # in pixels
  850. # {platform} can be one of Win Mac or Mtf
  851.  
  852. #
  853. # Macintosh Window positions
  854. #
  855. option -default MacPosn.AddrBook.Border "336 24 649 224 Norm"
  856. option -default MacPosn.Compose.Border "64 84 535 398 Norm"
  857. option -default MacPosn.Folder.Border "23 44 519 369 Norm"
  858. option -default MacPosn.MsgSrv.Border "24 44 520 369 Norm"
  859. option -default MacPosn.TopMS.Border "4 24 531 327 Norm"
  860. option -default MacPosn.Viewer.Border "44 64 515 378 Norm"
  861. option -default Macintosh.ScreenWin.Border "0 0 640 460 0 1"
  862. #
  863. # Windows window positions
  864. #
  865. if {$scrsize == "640 480"} {
  866. option -default WinPosn.AddrBook.Border "219 31 579 177 Norm"
  867. option -default WinPosn.Compose.Border "49 49 576 356 Norm"
  868. option -default WinPosn.Folder.Border "182 23 598 373 Norm"
  869. option -default WinPosn.MsgSrv.Border "24 46 587 362 Norm"
  870. option -default WinPosn.TaskWin.Border "16 51 618 470 Norm"
  871. option -default WinPosn.TopMS.Border "4 23 174 373 Norm"
  872. option -default WinPosn.Viewer.Border "18 41 582 332 Norm"
  873. option -default Windows.ScreenWin.Border "0 0 640 480 0 78"
  874. } elseif {$scrsize == "800 600"} {
  875. #
  876. # Windows window positions 800x600
  877. #
  878. option -default WinPosn.AddrBook.Border "433 32 735 290 Norm"
  879. option -default WinPosn.Compose.Border "30 48 585 445 Norm"
  880. option -default WinPosn.Folder.Border "299 23 768 482 Norm"
  881. option -default WinPosn.MsgSrv.Border "24 46 587 362 Norm"
  882. option -default WinPosn.TaskWin.Border "16 51 789 579 Norm"
  883. option -default WinPosn.TopMS.Border "4 23 292 482 Norm"
  884. option -default WinPosn.Viewer.Border "16 35 617 429 Norm"
  885. option -default Windows.ScreenWin.Border "0 0 800 600 0 78"
  886. } else {
  887. #
  888. # Windows window positions 1024 x 768
  889. #
  890. option -default WinPosn.AddrBook.Border "433 32 735 290 Norm"
  891. option -default WinPosn.Compose.Border "30 48 585 445 Norm"
  892. option -default WinPosn.Folder.Border "299 23 768 482 Norm"
  893. option -default WinPosn.MsgSrv.Border "24 46 587 362 Norm"
  894. option -default WinPosn.TaskWin.Border "16 51 789 579 Norm"
  895. option -default WinPosn.TopMS.Border "4 23 292 482 Norm"
  896. option -default WinPosn.Viewer.Border "16 35 617 429 Norm"
  897. option -default Windows.ScreenWin.Border "0 0 1024 768 0 78"
  898. }
  899. #
  900. # Motif Window Positions
  901. #
  902. option -default MtfPosn.AddrBook.Border "176 95 686 300 Norm"
  903. option -default MtfPosn.Compose.Border "70 117 598 432 Norm"
  904. option -default MtfPosn.Folder.Border "28 77 646 394 Norm"
  905. option -default MtfPosn.MsgSrv.Border "16 64 600 385 Norm"
  906. option -default MtfPosn.TaskWin.Border "0 0 1024 768 Norm"
  907. option -default MtfPosn.TopMS.Border "6 54 626 380 Norm"
  908. option -default MtfPosn.Viewer.Border "50 95 585 412 Norm"
  909.  
  910. # These indicate the position of the header, body and attachment
  911. # sections of the Compose and Viewer windows.
  912. #
  913. if {$pltfrm == "windows" || $pltfrm == "windows32"} {
  914. option -default SepPosn.Compose1 "41 81 0"
  915. option -default SepPosn.Compose2 "41 81 0"
  916. option -default SepPosn.Viewer1  "23 80 0"
  917. option -default SepPosn.Viewer2  "23 80 0"
  918. } elseif {$pltfrm == "mac" } {
  919. option -default SepPosn.Compose1 "35 70 0"
  920. option -default SepPosn.Compose2 "35 70 0"
  921. option -default SepPosn.Viewer1 "25 70 0"
  922. option -default SepPosn.Viewer2 "25 70 0"
  923. } else {
  924. option -default SepPosn.Compose1 "21 0 0"
  925. option -default SepPosn.Compose2 "21 70 0"
  926. option -default SepPosn.Viewer1 "22 70 0"
  927. option -default SepPosn.Viewer2 "22 70 0"
  928. }
  929.  
  930. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : END WINDOW POSITIONS"}
  931.  
  932. # END WINDOW POSITIONS
  933.  
  934. # DEFAULT DESKTOP
  935.  
  936. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : DEFAULT DESKTOP"}
  937.  
  938. # Save desktop state on exit so it can be restored on the next startup.
  939. # This saves the current window sizes, positions and contents including
  940. # the column manager settings. Valid settings are "ON" or "OFF".
  941.  
  942. if {$demo == "yes"} {
  943. option -default Desktop.SaveDesktopOnExit "OFF"
  944. } else {
  945. option -default Desktop.SaveDesktopOnExit "ON"
  946. }
  947. # The SaveMsg option tells Simeon the default Windows and Message Groups 
  948. # to open on start up. In this example, the Inbox will be opened in a 
  949. # separate window with the Main message group expanded to show the
  950. # messages within it. DO not enable this on the Motif platform as there
  951. # is a bug on first time startup which disables the Message Organizer
  952. # window.
  953.  
  954. if {$pltfrm != "motif"} {
  955. option -default SaveMsg.1.ms "1"
  956. option -default SaveMsg.1.folder ""
  957. option -default SaveMsg.1.group "0"
  958. option -default SaveMsg.1.state "EXPAND"
  959.  
  960. option -default SaveMsg.2.ms "1"
  961. option -default SaveMsg.2.folder "inbox"
  962. option -default SaveMsg.2.group "0"
  963. option -default SaveMsg.2.state "OPEN"
  964.  
  965. option -default SaveMsg.3.ms "1"
  966. option -default SaveMsg.3.folder "inbox"
  967. option -default SaveMsg.3.group "-1"
  968. option -default SaveMsg.3.state "EXPAND"
  969.  
  970. option -default SaveMsg.4.ms "-1"
  971. option -default SaveMsg.4.folder ""
  972. option -default SaveMsg.4.group "0"
  973. option -default SaveMsg.4.state "DONE"
  974. } else {
  975. option -default SaveMsg.1.ms "-1"
  976. option -default SaveMsg.1.folder ""
  977. option -default SaveMsg.1.group "0"
  978. option -default SaveMsg.1.state "DONE"
  979. }
  980.  
  981. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : END DEFAULT DESKTOP"}
  982.  
  983. # END DEFAULT DESKTOP
  984.  
  985. # WINDOWS MDI BEHAVIOR
  986.  
  987. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : WINDOWS MDI BEHAVIOR"}
  988.  
  989. # MS Windows MDI window inheritance behavior. ON means that when a
  990. # window is maximized and then closed the window gaining the focus is
  991. # also maximized. (this is default Windows behavior)
  992. # OFF means that when a maximized window is closed the window gaining
  993. # the focus remains normalized.
  994.  
  995. if {$demo == "yes"} {
  996. option -default Windows.MDI.Behavior "OFF"
  997. } else {
  998. option -default Windows.MDI.Behavior "ON"
  999. }
  1000.  
  1001. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : END WINDOWS MDI BEHAVIOR"}
  1002.  
  1003. # END WINDOWS MDI BEHAVIOR
  1004.  
  1005. # MAC AND MOTIF ONLINE/OFFLINE OPERATION
  1006.  
  1007. # Setting the following session option to "ON" will allow Mac and Motif
  1008. # clients to bring up the Online/Offline dialog at startup.
  1009. # The default of "OFF" suppresses the display of this dialog.
  1010.  
  1011. option -session General.Mobile "OFF"
  1012.  
  1013. # END MAC AND MOTIF ONLINE/OFFLINE OPERATION
  1014.  
  1015. # PASSWORD MANAGER
  1016. #
  1017. # The following options dictate whether the user will be allowed
  1018. # to change his password on the host from Simeon.
  1019.  
  1020. # TRUE enables the menu option FALSE disables it.
  1021. #
  1022. # Note: It should only be set to TRUE if you have
  1023. # the Simeon password manager daemon running on your server.
  1024.  
  1025. option -default -readonly General.PasswordManager.Enable "FALSE"
  1026.  
  1027. # The port number where the password manager daemon is running
  1028. # You may enter one option for each server running the password
  1029. # manager daemon or just set the default if they are all the same
  1030. #
  1031. # syntax: General.PasswordManager.port.{hostname} portnumber
  1032. #
  1033. # {hostname} = default means use this as the default for all hosts
  1034. #
  1035.  
  1036. option -default -readonly General.PasswordManager.port.default "1024"
  1037.  
  1038. #
  1039. # Examples of specific hostname port options
  1040. #
  1041. #option -default -readonly General.PasswordManager.port.monet   "1020"
  1042. #option -default -readonly General.PasswordManager.port.picasso "1022"
  1043.  
  1044. # END PASSWORD MANAGER
  1045.  
  1046. # READ RECEIPT POLICY
  1047. #
  1048. # This specifies the policy for generating read receipts (acknowledgements)
  1049. # It should be one of the following:
  1050. #  never  - never generatate a read receipt when requested (ignore request)
  1051. #  always - generate a read receipt when requested
  1052. #  prompt - ask user whether to generate the read receipt when requested
  1053. # Note: This option is not available for edit from Tools->Options->Edit
  1054.  
  1055. option -default -readonly General.ReadReceiptPolicy "Prompt"
  1056.  
  1057. # END READ RECEIPT POLICY
  1058.  
  1059. # VIEW MENU SETTINGS
  1060.  
  1061. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : VIEW MENU SETTINGS"}
  1062.  
  1063. # Setting to view short or raw messages headers when viewing a
  1064. # message in the Viewer window. Valid settings:
  1065. # "short" - Display selected formatted headers
  1066. # "raw"   - Display all headers as they appear in the RFC822 message envelope
  1067.  
  1068. option -default Viewer.HeaderStyle "short"
  1069.  
  1070. # Viewing hidden (empty) message groups is turned off by default. If user is upgrading
  1071. # from a previous version, the message group setting in his personal options
  1072. # will override this setting. Valid settings are
  1073. # "ON"  - view all message groups
  1074. # "OFF" - do not view hidden messages groups
  1075.  
  1076. option -default View.HiddenMsgGroups "OFF"
  1077.  
  1078. # Whether to view unsubscribed folders. Settings are:
  1079. # "ON"  - all folders will be displayed in the Message Organizer window
  1080. # "OFF" - only subscribed folders will be displayed in the MEssage Organizer window
  1081.  
  1082. option -default View.Unsubscribed "ON"
  1083.  
  1084. # Whether to display people and or lists in the Address Book Organizer
  1085. # window. Valid setting are "ON" or "OFF".
  1086.  
  1087. option -default AddrBook.ShowLists "ON"
  1088. option -default AddrBook.ShowPeople "ON"
  1089.  
  1090. # Whether Column Manager is displayed. Valid settings are "ON" or "OFF".
  1091.  
  1092. if { $demo == "yes"} {
  1093. option -default desktop.colman.visible "ON"
  1094. } else {
  1095. option -default desktop.colman.visible "OFF"
  1096. }
  1097.  
  1098. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : END VIEW MENU SETTINGS"}
  1099.  
  1100. # END VIEW MENU SETTINGS
  1101.  
  1102. # PRINTING
  1103.  
  1104. # Default page layout info for printing messages
  1105. # Valid variables are:
  1106. #
  1107. # $from  - from header
  1108. # $subj  - subject header
  1109. # $date  - date sent
  1110. # $pdate - print date
  1111. # $page  - page number
  1112.  
  1113. # The following creates a header of date left justified,
  1114. # subject right justified and a footer with a centered page number.
  1115. # Valid variables are:
  1116. # $from     Prints the name and e-mail address of the individual sending the message
  1117. #        as it appears in the envelope section From: header
  1118. # $date  Prints the date the message was sent (message Date: header)
  1119. # $subj  Prints the subject of the message as it appears in the envelope
  1120. #        section Subject: header
  1121. # $pdate Prints the current date (printing date)
  1122. # $page  Prints page numbers
  1123. # Any variable or text can be positioned on the line using the following:
  1124. #
  1125. # l    The "l" character for left justified text
  1126. # c    The "c" for center text
  1127. # r    The "r" for right justified text
  1128.  
  1129. # The l, c or r must be preceded by a space and followed by a space except
  1130. # when it is the first character letter of the header or footer.
  1131. # Text placed in a header or footer must be enclosed in single quotes.
  1132. # If a single quote is required in the text, use two single quotes. For example:
  1133. # 'John''s Mail'
  1134.  
  1135. option -default PageLayout.Header "\$pdate r \$subj"
  1136. # See startup.tcl for page footer default setting
  1137.  
  1138. # option -default PageLayout.Footer "c 'Page:' \$page"
  1139.  
  1140. # This option is not yet in use. Use $page to include a page
  1141. # number in a header or footer.
  1142. option -default PageLayout.PageNumbers "FALSE"
  1143.  
  1144. # Top and bottom margins are expressed in units of 'lines'
  1145.  
  1146. option -default PageLayout.TopMargin "5"
  1147. option -default PageLayout.BottomMargin "5"
  1148.  
  1149. # Left and right margins are expressed in units of 'characters' (actual
  1150. # width will depend on print font used)
  1151.  
  1152. option -default PageLayout.LeftMargin "5"
  1153. option -default PageLayout.RightMargin "5"
  1154.  
  1155. # Unix command used to send print output file to printer
  1156. # Simeon will replace the FIRST occurance of * with the name of the
  1157. # message file it wants to print
  1158.  
  1159. option -default Print.UnixCommand "lp *"
  1160.  
  1161. # END PRINTING
  1162.  
  1163. # USER
  1164.  
  1165. # See startup.tcl for General.FullName setting
  1166.  
  1167. # See startup.tcl for General.MailAddress setting
  1168.  
  1169. # See startup.tcl for General.ReplyTo setting
  1170.  
  1171. # See startup.tcl for default signature setting.
  1172.  
  1173. # Boolean to indicate whether to save userid/password to
  1174. # local file for auto start up. Defaulted to off as this
  1175. # is very insecure. To enabled this option, set to "TRUE".
  1176.  
  1177. option -default Options.SaveAuthInfo "FALSE"
  1178.  
  1179. # END USER
  1180.  
  1181. # MESSAGE ORGANIZER
  1182.  
  1183. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : MESSAGE ORGANIZER"}
  1184.  
  1185. # Check for new mail. Value is in minutes.
  1186.  
  1187. option -default Timer.Interval "10"
  1188.  
  1189. # Whether to clean (expunge messages marked for deletion) in open folders
  1190. # (mailboxes) on exit. Values are:
  1191. # "Always" - always clean mailboxes on exit
  1192. # "Never"  - never clean mailboxes on exit
  1193. # "Prompt" - when exiting, ask whether to clean mailboxes or not
  1194.  
  1195. option -default General.ExitClean "Prompt"
  1196.  
  1197. # When a message is deleted in the Message Organizer,
  1198. # specify whether the selection moves to the "Next" or 
  1199. # "Previous" message in the display.
  1200. #
  1201. # Please note that this option dictates Simeon's behaviour when
  1202. # a message is deleted while the focus is the Message Organizer window.
  1203. # This is different than Viewer.ActionDelete which controls the 
  1204. # selection when the focus is in the Viewer window.
  1205. #
  1206. # Also note that "Next" always means to move down the display,
  1207. # regardless of the sort order of the messages.  If your messages
  1208. # are sorted so that the most recently received one is at the top 
  1209. # "Next" will move the selection in a downward direction and give you the
  1210. # message listed below the current one.  In this case, the message will be
  1211. # older than the one currently selected. If you wish to process your
  1212. # mail in the order it was received, you would want to set this option
  1213. # to "Previous". 
  1214.  
  1215. option -default General.ActionDelete "Next"
  1216.  
  1217. # Fetch priority info off by default as this affects performance
  1218. # when loading folders. Values are "ON" or "OFF".
  1219. # It is on for the demo clients because we want them to see how it works.
  1220.  
  1221. if {$demo == "yes" } {
  1222. option -default General.PriorityHeader.Info "ON"
  1223. } else {
  1224. option -default General.PriorityHeader.Info "OFF"
  1225. }
  1226.  
  1227. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : END MESSAGE ORGANIZER"}
  1228.  
  1229. # END MESSAGE ORGANIZER
  1230.  
  1231. # COMPOSE
  1232.  
  1233. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : COMPOSE"}
  1234.  
  1235. # LineWrap setting is in characters. The default line wrap setting fits nicely
  1236. # within the default compose window size.
  1237.  
  1238. if {$pltfrm == "windows" || $pltfrm == "windows32"} {
  1239. option -default Compose.LineWrap "60"
  1240. } else {
  1241. option -default Compose.LineWrap "72"
  1242. }
  1243.  
  1244. # Message Priority. If Fetch Priority Headers is on (General.PriorityHeader.Info "ON")
  1245. # in the recipient's Simeon configuration, the message will be displayed in the recipient's
  1246. # inbox with the corresponding fonts and colors as specified under the recipient's FONTS AND COLORS
  1247. # settings.
  1248. # Choices are
  1249. # "Normal" - message marked as normal priority (PRIORITY: NORMAL header in message envelope)
  1250. # "High"   - message contains header PRIORITY: URGENT
  1251. # "Low"    - message contains header PRIORITY: LOW
  1252.  
  1253. option -default Compose.Priority "Normal"
  1254.  
  1255. # Request delivery receipt. If requested, and the recipient's MTA supports this
  1256. # functionality, the recipient's MTA will send a confirmation back to the send 
  1257. # when the message is received into the recipient's inbox. Settings are:
  1258. # "TRUE" - send a delivery reciept to sender
  1259. # "FALSE" - do not send a delivery receipt to the sender
  1260.  
  1261. option -default Compose.RequestDeliveryRcpt "FALSE"
  1262.  
  1263. # Request read receipt. A read receipt is sent by Simeon when the recipient
  1264. # views the message in his inbox. Settings are:
  1265. # "TRUE"  - send a read receipt to the sender
  1266. # "FALSE" - do not send a read receipt to the sender
  1267.  
  1268. option -default Compose.RequestReadRcpt "FALSE"
  1269.  
  1270. # Save message to sentmail folder. 
  1271. # Settings are:
  1272. # "TRUE" - always save a copy of the sent message in the sentmail folder
  1273. # "FALSE" - do not save a copy of the sent message
  1274.  
  1275. option -default Compose.SaveOutgoing "FALSE"
  1276.  
  1277. # Whether to queue outgoing messages. This feature is most often used when
  1278. # working offline. When set to "TRUE" all composed messages are stored in the
  1279. # user's 'outbox' until such time as the user requests them to be sent.
  1280. # Settings are:
  1281. # "TRUE"  - queue all outgoing messages to the outbox until specifically requested
  1282. #           to send to the server
  1283. # "FALSE" - do not queue message, send to server immediately
  1284.  
  1285. option -default Compose.QueueOutgoing "FALSE"
  1286.  
  1287. # See DEFAULT FOLDERS section for the default settings for
  1288. # Sentmail and Drafts folders
  1289.  
  1290. # What to do with the Compose window after sending. Options are:
  1291. # "Close"  - close the window after sending is complete (default)
  1292. # "Clear"  - clear but do not close window after sending
  1293. # "Remain" - leave the compose window untouched after sending
  1294.  
  1295. option -default Compose.Disposition "Close"
  1296.  
  1297. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : END COMPOSE"}
  1298.  
  1299. # END COMPOSE
  1300.  
  1301. # EDITOR
  1302.  
  1303. # External editor specification. Specification  does not need to contain full
  1304. # path if application in program path.
  1305.  
  1306. option -default Editor.Win.ExternalEditor "notepad.exe"
  1307. option -default Editor.Mac.ExternalEditor "SimpleText"
  1308. option -default Editor.Mtf.ExternalEditor "xterm -e vi"
  1309.  
  1310. # Whether to use an editor other than Simeon's when composing a message.
  1311. # "TRUE"  -  always use an external editor when Composing,
  1312. # "FALSE" -  do not use an external editor by default.
  1313.  
  1314. option -default Editor.Use.ExternalEditor "FALSE"
  1315.  
  1316. # URL Browser specification. Specification  does not need to contain full
  1317. # path if application in program path.
  1318.  
  1319. option -default Editor.Win.Browser "netscape.exe"
  1320. option -default Editor.Mac.Browser ""
  1321. option -default Editor.Mtf.Browser ""
  1322.  
  1323. # Setting to launch URL on dbl-click of URL in editor window
  1324. # Values are:
  1325. # "Always" - always launch browser on dbl-click
  1326. # "Prompt" - ask user if they want to launch a browser
  1327. # "Never"  - never launch browser, ignore dbl-click
  1328.  
  1329. option -default Editor.LaunchURL "Prompt"
  1330.  
  1331. # Whether to wrap text when pasted into a Compose edit session.
  1332. # "Never" will leave the pasted text alone, "Always" will wrap
  1333. # the pasted text to conform to the current linewrap setting.
  1334.  
  1335. option -default Editor.WrapPaste "Never"
  1336.  
  1337. # END EDITOR
  1338.  
  1339. # REPLY
  1340.  
  1341. # Whether to include all receipts in reply. (From, Cc)
  1342. # Valid settings are:
  1343. # "Always" - always include all recipients in response
  1344. # "Prompt" - ask user whether to include all recipients
  1345. # "Never"  - never include all recipients, use the From: field only
  1346.  
  1347. option -default Reply.All "Prompt"
  1348.  
  1349. # Whether to include original text in  reply. Values are:
  1350. # "Always" - alway include original text
  1351. # "Prompt" - ask user whether to include original text
  1352. # "Never"  - never include original text
  1353.  
  1354. option -default Reply.Text "Always"
  1355.  
  1356. # Indicates whether to wrap original text on a reply message.
  1357. # "TRUE"  - means always re-wrap on reply
  1358. # "FALSE" - means never re-wrap
  1359.  
  1360. option -default Reply.WrapOriginalText "FALSE"
  1361.  
  1362. # Character used to prefix original text in a reply. Can be any character.
  1363.  
  1364. option -default Reply.OriginalTextPrefix "> "
  1365.  
  1366. # Prefix inserted into the subject of a reply message
  1367.  
  1368. option -default Reply.Subject.Prefix "Re"
  1369.  
  1370. # END REPLY
  1371.  
  1372. # FORWARD
  1373.  
  1374. # Whether to forward the message as an RFC822 attachment vs. body text.
  1375. # Settings are:
  1376. # "Always" - always forward messages as an RFC822 attachment
  1377. # "Prompt" - ask user whether messages is to be forwarded as RFC822 attachment
  1378. # "Never" - never forward message as an RFC822 attachment, put original message
  1379. #          in the body of message
  1380.  
  1381. option -default Forward.Attachment "Prompt"
  1382.  
  1383. # Whether to wrap original text on forward.
  1384. # "TRUE"  - always re-wrap text to user's linewrap setting
  1385. # "FALSE" - do not re-wrap, leave original text untouched.
  1386.  
  1387. option -default Forward.WrapOriginalText "FALSE"
  1388.  
  1389. # Substring to use in subject on a fowarded message. Setting can be
  1390. # any sequence of characters.
  1391.  
  1392. option -default Forward.Subject.Prefix "fwd"
  1393.  
  1394. # Specification for the location of the forward subject substring.
  1395. # Values are:
  1396. # "Prefix" - insert forward subject string before subject
  1397. # "Suffix" - insert forward subject string after subject
  1398.  
  1399. option -default Forward.Subject.Location "Suffix"
  1400.  
  1401. # END FORWARD
  1402.  
  1403. # SEND
  1404.  
  1405. # See STARTUP DEFAULTS for default settings of SMTP hostname and port number.
  1406.  
  1407. # Expand addresses on send default to off. To turn it on use "ON"
  1408.  
  1409. option -default AddrBook.ExpandOnSend "OFF"
  1410.  
  1411. # This option is not available from the Tools->Options->Edit menu
  1412. # in Simeon. It dictates the type of search which will be performed
  1413. # in the address book when expanding an alias. The valid choices
  1414. # are "starts with", "contains","ends with", "is", (exact match)
  1415.  
  1416. option -default AddrBook.SearchType "starts with"
  1417.  
  1418. # What fields to search in the address book when expanding an
  1419. # alias. Settings are
  1420. # "ON"  - search this field
  1421. # "OFF" - do not search this field.
  1422.  
  1423. option -default AddrBook.SearchAlias "ON"
  1424. option -default AddrBook.SearchName "ON"
  1425. option -default AddrBook.SearchEmail "ON"
  1426.  
  1427. # Send method. Foreground or Background.
  1428. # Setting are:
  1429. # "ON"  - send messages in the background
  1430. # "OFF" - send messages in the foreground
  1431.  
  1432. option -default Send.Background "OFF"
  1433.  
  1434. # See DEFAULT FOLDERS for Queued Message Folder (outbox) default
  1435.  
  1436. # Option to disable the creation of a Sender header in mail generated by
  1437. # Simeon.  By default this option is FALSE and Sender headers ARE
  1438. # generated. Settings are:
  1439. # "FALSE" - do not suppress generation of sender header. Sender header will be generated
  1440. #           as follows
  1441. #           1. the value of the IMSP "common.from" variable.
  1442. #           2. the value of the session default userid specified in the login dialog,
  1443. #              concatenated with the domain specified in the IMSP option "common.domain" or,
  1444. #              if not available, the domain part of the user "From" address.
  1445. # "TRUE"  - suppress the generation of the sender header
  1446.  
  1447. option -default Send.SuppressSenderHeader "FALSE"
  1448.  
  1449. # END SEND
  1450.  
  1451. # VIEWER
  1452.  
  1453. # Option to indicate number of viewer windows allowed. Values are:
  1454. # "One"     - one viewer only, can only view one message at a time
  1455. # "Folder"  - one viewer per folder, can view one message per folder
  1456. #             at a time.
  1457. # "Message" - one viewer per message, ie. can view as many messages as
  1458. #             desired at one time
  1459.  
  1460. option -default Viewer.Instances "One"
  1461.  
  1462. # Whether to re-wrap message before viewing
  1463. # "Always" - always re-wrap to user's linewrap configuration
  1464. # "Never"  - never re-wrap, leave message as it was sent
  1465.  
  1466. option -default Viewer.AutoWrap "Never"
  1467.  
  1468. # What to do when you delete the message you are currently viewing.
  1469. # Choices are to view the "Next" or "Previous" message or "Close" the
  1470. # viewer window.
  1471. #
  1472. # Please note that this option dictates Simeon's behaviour when
  1473. # a message is deleted while the focus is in a Viewer window. This is
  1474. # different than the General.ActionDelete option, which controls the 
  1475. # selection when the focus is in the Message Organizer window.
  1476. #
  1477. # Please see MESSAGE ORGANIZER General.ActionDelete for a discussion
  1478. # on how Simeon interprets "Next" and "Previous".
  1479.  
  1480. option -default Viewer.ActionDelete "Next"
  1481.  
  1482. # END VIEWER
  1483.  
  1484. # ADDRESS BOOK
  1485.  
  1486. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : ADDRESS BOOK"}
  1487.  
  1488. # See STARTUP DEFAULTS for address book (IMSP) hostname and port number.
  1489.  
  1490. # Note: The following options are not available from the
  1491. # Tools->Options->Edit menu.
  1492. #
  1493. # These options indicate whether to allow the creation of 
  1494. # local and/or remote address books.
  1495. # If set to "TRUE" (default), the user will be allowed to create
  1496. # new address books at the specified location.
  1497. # Note that it is not an error for both to be set to "FALSE"
  1498. # as a site may wish users to have access to shared IMSP
  1499. # address books but at the same time, prevent them from
  1500. # creating their own new books, either remotely or locally.
  1501. #
  1502. # Additional Note: If books already exist at the location which
  1503. # is disabled, the user will be able to access those books
  1504. # as they normally would. These options, when set to FALSE, merely
  1505. # prevent the creation of NEW address books at the location.
  1506.  
  1507. option -default AddrBook.EnableRemote "TRUE"
  1508. option -default AddrBook.EnableLocal  "TRUE"
  1509.  
  1510. # Note: This option is not available from Tools->Options->Edit menu.
  1511. # It dictates the default setting for the "Search in Compose"
  1512. # setting in the New Address Book dialog.
  1513. # If set to "ON", Search in Compose will be checked by
  1514. # default, if set to "OFF", Search in Compose is not checked
  1515. # Note that this option does not prevent the user from
  1516. # changing the setting, it merely sets a policy for initializing
  1517. # the default.
  1518.  
  1519. option -default AddrBook.SearchFlagDefault "ON"
  1520.  
  1521. # Note: This option is not available from Tools->Options->Edit menu.
  1522. # It dictates the default setting for the address book location.
  1523. # (The "Remote and Local" radio buttons
  1524. # in the New Address Book dialog.)
  1525. # If set to "Remote", the Remote button will be selected.
  1526. # If set to "Local", the Local button will be selected.
  1527. # Note that this option does not prevent the user from
  1528. # changing the setting, it merely sets a policy for 
  1529. # initializing the default.
  1530.  
  1531. option -default AddrBook.LocationDefault "Local"
  1532.  
  1533. # The default host name and port number of the X.500 server.
  1534. # If a guest account requested, set LDUA host to ESYS demo server
  1535.  
  1536. if {$guest == "no"} {
  1537. option -default LDUA.Hostname ""
  1538. option -default LDUA.TCPPort "389"
  1539. } else {
  1540. option -default LDUA.Hostname "\[198.161.92.131\]"
  1541. option -default LDUA.TCPPort "389"
  1542. }
  1543.  
  1544. # Options controlling which attributes from person entries are
  1545. # save into the Simeon addressbook (These are not available for
  1546. # edit under Tools->Options->Edit)
  1547.  
  1548. option -default ldua.attribute_for_oid.rfc822Mailbox   "email"
  1549. option -default ldua.attribute_for_oid.streetAddress   "address"
  1550. option -default ldua.attribute_for_oid.telephoneNumber "phone"
  1551. option -default ldua.attribute_for_oid.favoriteDrink   "drink"
  1552. option -default ldua.attribute_for_oid.labeledURI      "home_page"
  1553.  
  1554. # also include shortname equivalents
  1555. option -default ldua.attribute_for_oid.mail            "email"
  1556. option -default ldua.attribute_for_oid.drink           "drink"
  1557. option -default ldua.attribute_for_oid.phone           "phone"
  1558. option -default ldua.attribute_for_oid.street          "address"
  1559.  
  1560. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : END ADDRESSBOOK"}
  1561.  
  1562. # END ADDRESS BOOK
  1563.  
  1564. # ALIAS EXPANSION
  1565.  
  1566. # This turns on the Book search flag for the local address
  1567. # book so that there is at least one book for the alias
  1568. # expansion to work against. 
  1569.  
  1570. option -default AddrBook.SearchFlag.local "ON"
  1571.  
  1572. # If you wish to turn on the Search flag for a globally shared IMSP book
  1573. # uncomment the following and modify the book name appropriately.
  1574. # For instance, if the userid ubk4 owns a shared IMSP book called Staff
  1575. # the entry would be as shown below:
  1576.  
  1577. #option -default AddrBook.SearchFlag.ubk4.Staff "ON"
  1578.  
  1579. # END ALIAS EXPANSION
  1580.  
  1581. # LOGGING
  1582.  
  1583. # These options indicate whether to generate debug telemetry files
  1584. # while executing Simeon. The default should always be off unless
  1585. # trouble-shooting. These can be changed on the fly via 
  1586. # Tools->Options->Edit->Logging when running Simeon or in the
  1587. # DEBUG LOGGING section of this file. They are included here for
  1588. # documentation purposes.
  1589.  
  1590. option -default Debugging.Level "none"
  1591. option -default Debugging.Subsystem 0
  1592.  
  1593. # END LOGGING
  1594.  
  1595. # TROUBLE REPORT
  1596.  
  1597. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : TROUBLE REPORT"}
  1598.  
  1599. # This address is placed in the "To:" field of a Compose window when a
  1600. # user chooses "Compose->Trouble Report" from the main menu.  The intent
  1601. # is that site administrators will edit this field to contain the
  1602. # mail address of their local help desk.  This allows local help desk
  1603. # staff to manage and qualify trouble reports before contacting
  1604. # Simeon Technical Support.
  1605. #
  1606. # If the trblrpt.txt file from the Simeon distribution is placed in the
  1607. # user's working directory, it will be automatically read into the
  1608. # Compose window when Compose->Trouble report is selected.
  1609. # For demo software, initialize to the eval address"
  1610.  
  1611. if {$guest == "no"} {
  1612. option -default General.BetaAddress ""
  1613. } else {
  1614. option -default General.BetaAddress "Evaluate Simeon <eval@esys.ca>"
  1615. }
  1616.  
  1617. # 
  1618. # The default Subject line of the Trouble Report contains the OS and
  1619. # Simeon version similar to the following:
  1620. #
  1621. # Win32, 4.1.1 Build (5), Crash/Bug/Unexpected/Wish, Title.
  1622. #
  1623. # The idea is that the user will edit this subject line to categorize
  1624. # the type of problem and replace the word 'Title' with a one line
  1625. # description of the nature of the problem.
  1626. # The default Subject can be replaced with a customized version specific
  1627. # to the site by uncommenting and modifing the following option:
  1628.  
  1629. #option -default General.TroubleReportSubject "HelpDesk Customized Subject"
  1630.  
  1631. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl : END TROUBLE REPORT"}
  1632.  
  1633. # END TROUBLE REPORT
  1634.  
  1635. if {$sdlog == "yes"} {debug_trace "sysdflt.tcl end"}
  1636.  
  1637. # END MODULE : site_administration_defaults - All platforms, part 1
  1638.