home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 5 Edit / 05-Edit.zip / elvos221.zip / lib / elvis.ini < prev    next >
Text File  |  1998-12-10  |  2KB  |  87 lines
  1. """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
  2. " DEFINE SOME DIGRAPHS
  3. if os == "msdos" || os == "os2" || (os == "win32" && gui != "windows")
  4. then source! (elvispath("elvis.pc8"))
  5. else source! (elvispath("elvis.lat"))
  6. "
  7. """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
  8. " CHOOSE SOME DEFAULT OPTION VALUES BASED ON THE INVOCATION NAME
  9. let p=tolower(basename(program))
  10. if p == "ex" || p == "edit"
  11. then set! initialstate=ex
  12. if p == "view"
  13. then set! defaultreadonly
  14. if p == "edit" || p == "vedit"
  15. then set! novice
  16. set p=""
  17. if home == ""
  18. then let home=dirdir(program)
  19. "
  20. """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
  21. " IF ALIASES ARE SUPPORTED, THEN LOAD THE DEFAULT ALIASES
  22. if feature("alias")
  23. then source! (elvispath("elvis.ali"))
  24. "
  25. """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
  26. " SYSTEM TWEAKS GO HERE
  27. "
  28. " The Linux console can't handle colors and underlining.
  29. if gui=="termcap"
  30. then {
  31.  if term=="linux"
  32.  then set! nottyunderline
  33. }
  34. "
  35. """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
  36. " WINDOWS DEFAULT COLORS GO HERE (may be overridden in elvis.rc file)
  37. if gui=="windows"
  38. then {
  39.  color e green
  40.  color i magenta
  41.  color u blue
  42.  color f red
  43. }
  44. "
  45. """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
  46. " X11 DEFAULT COLORS AND TOOLBAR GO HERE (may be overridden in .exrc file)
  47. if gui=="x11"
  48. then so! (elvispath("elvis.x11"))
  49. "
  50. """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
  51. " EXECUTE THE STANDARD CUSTOMIZATION SCRIPTS
  52. let f=(os=="unix" ? ".elvisrc" : "elvis.rc")
  53. if $EXINIT
  54. then eval $EXINIT
  55. else source! (exists(home/f)?home/f:home/".exrc")
  56. " ≈≈≈ PROCURA
  57. source! ~/.elvislib/elvis.rc
  58. if exrc && getcwd()!=home
  59. then safer! (exists(f)?f:".exrc")
  60. set f=""
  61. "
  62. """""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
  63. " X11 INTERFACE DEFAULT FONTS GO HERE
  64. if gui == "x11"
  65. then {
  66.  if normalfont == ""
  67.  then set! normalfont="*-courier-medium-r-*-18-*" 
  68.  then set! boldfont="*-courier-bold-r-*-18-*" 
  69.  then set! italicfont="*-courier-medium-o-*-18-*" 
  70. }
  71. "
  72. if os == "os2" && gui != "x11"
  73. then {
  74.   if $TERM != "xterm"
  75.   then color n white
  76.   else color n black
  77.   color e green
  78.   color i magenta
  79.   color u blue
  80.   color f red
  81.   set ul=20
  82.   set ruler
  83.   set showmatch
  84.   set showmode
  85.   set autoindent
  86. }
  87.