From de85fd8ca59a8c463efcf0556751c73f1846e321 Mon Sep 17 00:00:00 2001
From: David Thompson <dthompson@member.fsf.org>
Date: Sun, 15 Sep 2013 22:40:14 -0400
Subject: Clean up docstrings for window module.

---
 2d/window.scm | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

(limited to '2d')

diff --git a/2d/window.scm b/2d/window.scm
index 2631d7f..094314b 100644
--- a/2d/window.scm
+++ b/2d/window.scm
@@ -30,8 +30,8 @@
             close-window))
 
 (define* (open-window title resolution fullscreen)
-  "Creates the game window with the specified dimensions and
-initializes OpenGL state."
+  "Open the game window with the given TITLE and RESOLUTION. If
+FULLSCREEN is #t, open a fullscreen window."
   (let ((flags (if fullscreen '(opengl fullscreen) 'opengl))
         (width (vx resolution))
         (height (vy resolution)))
@@ -56,7 +56,6 @@ initializes OpenGL state."
                            (blending-factor-dest one-minus-src-alpha))))
 
 (define (close-window)
-  "Closes the game window and cleans up. This procedure is typically
-called just before calling (quit)."
+  "Close the game window and audio."
   (SDL:close-audio)
   (SDL:quit))
-- 
cgit v1.2.3