home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / archives / ckermit-8.0.206-0.3.i386.rpm / ckermit-8.0.206.0.3.cpio.gz / ckermit-8.0.206.0.3.cpio / etc / kermit / ckermit.locale.ini < prev    next >
Text File  |  2002-12-12  |  1KB  |  47 lines
  1. ; /etc/kermit/ckermit.locale.ini: locale settings for C-Kermit
  2. ; created 27-Jan-1997 jmk
  3. ; autodate: 12-Mar-1997 
  4. ; autotime: 00:28 
  5.  
  6. echo { Setting locale ...}
  7.  
  8. ; define various locale settings
  9. define locale_set_country {
  10.   set input case ignore
  11.   switch \%1 {
  12.     :usa 
  13.       set dial country-code 1
  14.       set dial intl-prefix 011
  15.       set dial ld-prefix 1
  16.       set dial toll-free-area-code 800 888
  17.       set dial toll-free-prefix 1
  18.       break
  19.     :canada
  20.       set dial country-code 1
  21.       set dial intl-prefix 011
  22.       set dial ld-prefix 1
  23.       set dial toll-free-area-code 800 888
  24.       set dial toll-free-prefix 1
  25.       break
  26.     :default
  27.       echo { Error: unknown country name `\%1' ...}
  28.       stop 0 { please add it to \m(locale_ini)}
  29.   }
  30. }
  31. define locale {
  32.   xif < \v(argc) 3 {
  33.     stop 0 { Usage: LOCALE country-name area-code}
  34.   }
  35.   xif numeric \%2 {
  36.     set dial area-code \%2
  37.   } else {
  38.     stop 0 { Error: area-code must be numeric}
  39.   }
  40.   locale_set_country \%1
  41. }
  42.  
  43. ; set the locale here
  44. locale usa 919
  45.  
  46. ; -------- End --------
  47.