home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / Editor / FREDV19A.LHA / FrexxEd / fpl / FlipComment.FPL < prev    next >
Encoding:
Text File  |  1995-07-19  |  501 b   |  20 lines
  1. /* FlipComment.FPL Copyright Niklas Angare */
  2.  
  3. export void FlipComment() {
  4.    string line = GetLine();
  5.  
  6.    if(strlen(line)>1) {
  7.       if(strcmp(substr(line, 0, 2), "/*"))    /* Add comment */
  8.          line = sprintf("/*%s*/\n", substr(line, 0, strlen(line)-1));
  9.       else {                    /* Remove comment */
  10.          line = substr(line, 2, strlen(line)-5);
  11.          line = joinstr(line, "\n");
  12.       }
  13.       DeleteLine(1);
  14.       Output(line);
  15.    }
  16.    else CursorDown(1);
  17. }
  18.  
  19. AssignKey("FlipComment();", "alt c");
  20.