/[climacs]/climacs/html-syntax.lisp
ViewVC logotype

Diff of /climacs/html-syntax.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.32 by dmurray, Mon Aug 15 23:31:22 2005 UTC revision 1.33 by dmurray, Sat May 6 19:51:04 2006 UTC
# Line 798  Line 798 
798                          do (let ((token (lexeme lexer start-token-index)))                          do (let ((token (lexeme lexer start-token-index)))
799                               (display-parse-tree token syntax pane))                               (display-parse-tree token syntax pane))
800                             (incf start-token-index))))))))                             (incf start-token-index))))))))
801       (when (mark-visible-p pane) (display-mark pane syntax))       (when (region-visible-p pane) (display-region pane syntax))
802       (display-cursor pane syntax current-p)))       (display-cursor pane syntax current-p)))
803    

Legend:
Removed from v.1.32  
changed lines
  Added in v.1.33

  ViewVC Help
Powered by ViewVC 1.1.5