Skip to content

Commit f16875e

Browse files
Fix 6 occurrences of printf-to-display
This use of `printf` has no arguments other than the template string.
1 parent 6da92a4 commit f16875e

File tree

1 file changed

+6
-6
lines changed

1 file changed

+6
-6
lines changed

cli.rkt

Lines changed: 6 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -302,10 +302,10 @@ For help on these, use 'analyze --help' or 'fix --help'."
302302

303303
(match (resyntax-analyze-options-output-destination options)
304304
['console
305-
(printf "resyntax: --- displaying results ---\n")
305+
(displayln "resyntax: --- displaying results ---")
306306
(display-results)]
307307
[(? path? output-path)
308-
(printf "resyntax: --- writing results to file ---\n")
308+
(displayln "resyntax: --- writing results to file ---")
309309
(with-output-to-file output-path display-results #:mode 'text)]))
310310

311311

@@ -347,7 +347,7 @@ For help on these, use 'analyze --help' or 'fix --help'."
347347
(define issue-string (if (> total-fixes 1) "issues" "issue"))
348348
(define file-string (if (> total-files 1) "files" "file"))
349349
(if (zero? total-fixes)
350-
(printf "Resyntax found no issues.\n")
350+
(displayln "Resyntax found no issues.")
351351
(printf "Resyntax fixed ~a ~a in ~a ~a.\n\n" total-fixes issue-string total-files file-string))
352352
(for ([rule+count (in-list fix-counts-by-rule)])
353353
(match-define (entry rule count) rule+count)
@@ -358,7 +358,7 @@ For help on these, use 'analyze --help' or 'fix --help'."
358358

359359

360360
(define (resyntax-fix-print-plain-text-summary analysis)
361-
(printf "resyntax: --- summary ---\n\n")
361+
(displayln "resyntax: --- summary ---\n")
362362
(define total-fixes (resyntax-analysis-total-fixes analysis))
363363
(define total-files (resyntax-analysis-total-sources-modified analysis))
364364
(define message
@@ -399,11 +399,11 @@ For help on these, use 'analyze --help' or 'fix --help'."
399399
(define issue-string (if (> total-fixes 1) "issues" "issue"))
400400
(define file-string (if (> total-files 1) "files" "file"))
401401
(if (zero? total-fixes)
402-
(printf "Resyntax found no issues.")
402+
(display "Resyntax found no issues.")
403403
(printf "Resyntax fixed ~a ~a in ~a ~a."
404404
total-fixes issue-string total-files file-string))
405405
(unless (zero? total-fixes)
406-
(printf "\n")
406+
(newline)
407407
(for ([rule+count (in-list fix-counts-by-rule)])
408408
(match-define (entry rule count) rule+count)
409409
(define occurrence-string (if (> count 1) "occurrences" "occurrence"))

0 commit comments

Comments
 (0)