info-helper.rkt
#lang racket
;Provides the names of labels and other items that are used across info.rkt, tool.rkt,
; and code-coverage.scrbl so that to change the value in all 3 locations only info.rkt
; needs to be updated
(require setup/getinfo)
(provide info-look-up 
         coverage-suffix
         tool-name
         button-label
         open-with-label)

(define info-proc (get-info (list "code-coverage")))
(define (info-look-up name) (info-proc name (λ () (symbol->string name))))

(define coverage-suffix (info-look-up 'coverage-suffix))
(define tool-name (info-look-up 'tool-name))
(define button-label (info-look-up 'button-label))
(define open-with-label (info-look-up 'open-with-label))