From 1bdeade900d0662f4bad1855962f30cba89c1c7c Mon Sep 17 00:00:00 2001 From: Sam Tobin-Hochstadt Date: Mon, 2 Dec 2013 12:40:10 -0500 Subject: [PATCH] Export `unsave-bug-report`. Fix doc typo. --- pkgs/drracket-pkgs/drracket/help/bug-report.rkt | 1 + pkgs/drracket-pkgs/drracket/help/bug-report.scrbl | 6 +++++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/pkgs/drracket-pkgs/drracket/help/bug-report.rkt b/pkgs/drracket-pkgs/drracket/help/bug-report.rkt index 7a97148d3c..7a7232bd9e 100644 --- a/pkgs/drracket-pkgs/drracket/help/bug-report.rkt +++ b/pkgs/drracket-pkgs/drracket/help/bug-report.rkt @@ -15,6 +15,7 @@ (provide help-desk:report-bug (struct-out brinfo) saved-bug-report-titles/ids + unsave-bug-report discard-all-saved-bug-reports) (define (bug-server-url path) diff --git a/pkgs/drracket-pkgs/drracket/help/bug-report.scrbl b/pkgs/drracket-pkgs/drracket/help/bug-report.scrbl index d6fec1d4d8..73fdd63992 100644 --- a/pkgs/drracket-pkgs/drracket/help/bug-report.scrbl +++ b/pkgs/drracket-pkgs/drracket/help/bug-report.scrbl @@ -13,7 +13,7 @@ (make-mixin-contract frame%) values]) void?]{ - Opens a bug report window to edit the but report identified by @racket[this-bug-id]. + Opens a bug report window to edit the bug report identified by @racket[this-bug-id]. If @racket[this-bug-id] is @racket[#f], then creates a new bug ID and uses that one. The @racket[frame-mixin] argument is passed the frame class before creating the window. @@ -28,6 +28,10 @@ open in frames. } +@defproc[(unsave-bug-report [bug-id exact-positive-integer?]) void?]{ + Deletes the saved bug report identified by @racket[bug-id]. +} + @defstruct[brinfo ([title label-string?] [id number?]) #:transparent]{ A record representing a saved bug report. The @racket[id] field is suitable