From 2ba2b39f73d0fa9f01d096983fbc8f630a8bc6e9 Mon Sep 17 00:00:00 2001 From: siddharth ravikumar Date: Sun, 19 Jun 2022 17:41:02 -0400 Subject: static/logo: peach.rkt: use `make-logo` to make logo --- static/logo/peach.rkt | 12 ++---------- 1 file changed, 2 insertions(+), 10 deletions(-) diff --git a/static/logo/peach.rkt b/static/logo/peach.rkt index 506e65e..54e1382 100644 --- a/static/logo/peach.rkt +++ b/static/logo/peach.rkt @@ -50,13 +50,5 @@ (png-export logo-bitmap size))) ;Export logo to a PNG file. -;; Peach logo as a bitmap. -(define peach-logo (draw-logo 500)) - - -;; Render logo in racket shell. -(make-object image-snip% peach-logo) - - -;; Export logo to a PNG file. -(png-export peach-logo 500) +;; Make 500x500 logo. +(make-logo 500) -- cgit v1.2.3