Просмотр исходного кода

correct output wording for resolved proposals

George C. Privon 5 лет назад
Родитель
Сommit
322f7907db
1 измененных файлов с 1 добавлено и 1 удалено
  1. 1 1
      update_proposals.rkt

+ 1 - 1
update_proposals.rkt

@@ -107,7 +107,7 @@
 ; retrieve and print the proposals whose status are not listed as "submitted"
 (define (printclosed)
   (define finished (query-rows conn "SELECT ID,telescope,solicitation,title,PI FROM proposals WHERE status!='submitted'"))
-  (displayln (string-append (number->string (length finished)) " pending proposals found."))
+  (displayln (string-append (number->string (length finished)) " resolved proposals found."))
   (newline)
   ; print all the unresolved proposals to the screen
   (map printentry finished))