home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume11 / se.pch.2 < prev    next >
Encoding:
Internet Message Format  |  1987-09-20  |  3.3 KB
  1. Subject:  v11i067:  Second update for 'SE' editor
  2. Newsgroups: comp.sources.unix
  3. Sender: sources
  4. Approved: rs@uunet.UU.NET
  5.  
  6. Submitted-by: gatech!emoryu1!arnold (Arnold D. Robbins)
  7. Posting-number: Volume 11, Issue 67
  8. Archive-name: se.pch.2
  9.  
  10. [  Not a shar; feed this right into diff.  Do folks prefer things this
  11.    way?  --r$  ]
  12.  
  13. Here is a second (and hopefully final) patch to 'se'. It fixes a small gaff
  14. in the man page and adds code to highlight remark messages in the status
  15. line.
  16.  
  17. Arnold Robbins
  18. -------------- cut here, feed to patch in 'se' source directory -----
  19. *** /tmp/,RCSt1014678    Wed Aug  5 15:14:58 1987
  20. --- screen.c    Tue Feb  3 18:27:13 1987
  21. ***************
  22. *** 758,764 ****
  23. --- 758,768 ----
  24.           }
  25.   
  26.           load (' ', Nrows - 1, col);
  27. +         if (t == REMARK_MSG)
  28. +             brighton ();    /* reverse video or highlight - on */
  29.           loadstr (s, Nrows - 1, col + 1, 0);
  30. +         if (t == REMARK_MSG)
  31. +             brightoff ();    /* turn back off */
  32.           load (' ', Nrows - 1, col + need - 1);
  33.           last = col + need - 1;
  34.           if (last > Ncols - 1)
  35. *** /tmp/,RCSt1014678    Wed Aug  5 15:15:18 1987
  36. --- term.c    Tue Feb  3 18:37:44 1987
  37. ***************
  38. *** 96,101 ****
  39. --- 96,103 ----
  40.   static char *DL;    /* hardware delete line */
  41.   static char *AL;    /* hardware add (insert) line */
  42.   static char *CL;    /* clear screen */
  43. + static char *STANDOUT;    /* standout on  (SO conflicts w/ASCII character name) */
  44. + static char *SE;    /* standout end */
  45.   
  46.   extern char PC;        /* Pad character, usually '\0' */
  47.   
  48. ***************
  49. *** 126,131 ****
  50. --- 128,135 ----
  51.               "dl",    & DL,
  52.               "al",    & AL,
  53.               "cl",    & CL,
  54. +             "so",    & STANDOUT,
  55. +             "se",    & SE,
  56.               "pc",    & pcstr,
  57.               NULL,    NULL
  58.               };
  59. ***************
  60. *** 192,197 ****
  61. --- 196,203 ----
  62.   #define DL    delete_line
  63.   #define AL    insert_line
  64.   #define CM    cursor_address
  65. + #define STANDOUT    enter_standout_mode
  66. + #define SE    exit_standout_mode
  67.   
  68.   /* setcaps -- get the capabilities from the terminfo database */
  69.   
  70. ***************
  71. *** 2079,2082 ****
  72. --- 2085,2108 ----
  73.           error (NO, "se: could not determine number of columns");
  74.   
  75.       return OK;
  76. + }
  77. + 
  78. + /* brighton --- turn on reverse video/standout mode */
  79. + 
  80. + brighton ()
  81. + {
  82. + #ifndef HARD_TERMS
  83. +     if (STANDOUT)
  84. +         tputs (STANDOUT, 1, outc);
  85. + #endif
  86. + }
  87. + 
  88. + /* brightoff --- turn off reverse video/standout mode */
  89. + 
  90. + brightoff ()
  91. + {
  92. + #ifndef HARD_TERMS
  93. +     if (SE)
  94. +         tputs (SE, 1, outc);
  95. + #endif
  96.   }
  97. *** /tmp/,RCSt1014714    Wed Aug  5 15:17:28 1987
  98. --- se.m4    Mon Jul 27 14:53:49 1987
  99. ***************
  100. *** 1,7 ****
  101.   .\" 
  102. ! .\" $Header: se.m4,v 1.6 86/11/12 11:34:49 arnold Exp $
  103.   .\" 
  104.   .\" $Log:    se.m4,v $
  105.   .\" Revision 1.6  86/11/12  11:34:49  arnold
  106.   .\" Fixed use of `BSD'. Changed discussion of windows. ADR.
  107.   .\" 
  108. --- 1,10 ----
  109.   .\" 
  110. ! .\" $Header: se.m4,v 1.7 87/07/27 14:52:52 arnold Exp $
  111.   .\" 
  112.   .\" $Log:    se.m4,v $
  113. + .\" Revision 1.7  87/07/27  14:52:52  arnold
  114. + .\" Removed an inadvertant reference to UNIX and SWT modes.
  115. + .\" 
  116.   .\" Revision 1.6  86/11/12  11:34:49  arnold
  117.   .\" Fixed use of `BSD'. Changed discussion of windows. ADR.
  118.   .\" 
  119. ***************
  120. *** 449,456 ****
  121.   This command provides access to on-line documentation on
  122.   the screen editor.
  123.   \*(lqStuff\*(rq may be used to select which information is displayed.
  124. - The help command will display information which is correct
  125. - for both UNIX and SWT modes.
  126.   .TP
  127.   (.)\^i\^[:text]  Insert
  128.   If the command is immediately followed by a colon, then
  129. --- 452,457 ----
  130.  
  131.