original commit: 0c7aaacc5729cccbf3c6b4614d8c0ddcc2c2155a
This commit is contained in:
Robby Findler 2002-08-20 02:59:08 +00:00
parent c4c5e6ea9a
commit 62224e9818

View File

@ -28,7 +28,7 @@
(define/override (make-snip) (make-object comment-box-snip%)) (define/override (make-snip) (make-object comment-box-snip%))
(define/override (get-corner-bitmap) bm) (define/override (get-corner-bitmap) bm)
(define/override (make-menu) (define/override (get-menu)
(let ([menu (make-object popup-menu%)]) (let ([menu (make-object popup-menu%)])
(make-object menu-item% (make-object menu-item%
(string-constant convert-to-semicolon-comment) (string-constant convert-to-semicolon-comment)