remove trailing whitespace

1 files changed, 12 insertions, 12 deletions

diff --git a/tekuti/boot.scm b/tekuti/boot.scm
index bccb35d..1cce477 100644
--- a/tekuti/boot.scm
+++ b/tekuti/boot.scm
@@ -1,16 +1,16 @@
 ;; Tekuti
-;; Copyright (C) 2008, 2010 Andy Wingo <wingo at pobox dot com>
+;; Copyright (C) 2008, 2010, 2012 Andy Wingo <wingo at pobox dot com>
 
-;; This program is free software; you can redistribute it and/or    
-;; modify it under the terms of the GNU General Public License as   
-;; published by the Free Software Foundation; either version 3 of   
-;; the License, or (at your option) any later version.              
-;;                                                                  
-;; This program is distributed in the hope that it will be useful,  
-;; but WITHOUT ANY WARRANTY; without even the implied warranty of   
-;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the    
-;; GNU General Public License for more details.                     
-;;                                                                  
+;; This program is free software; you can redistribute it and/or
+;; modify it under the terms of the GNU General Public License as
+;; published by the Free Software Foundation; either version 3 of
+;; the License, or (at your option) any later version.
+;;
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+;;
 ;; You should have received a copy of the GNU General Public License
 ;; along with this program; if not, contact:
 ;;
@@ -45,7 +45,7 @@
     (let ((required (and=> (assq 'required (cdr opt)) cadr)))
       (format #f "~:[[~;~]--~a~@*~:[]~;~]"
               (assq 'required? (cdr opt)) (car opt))))
-        
+
   (format #t "usage: tekuti ~{~a~^ ~}~%"
           (map repr-option *option-grammar*)))