Bug#285412: gnome-games: patch for nicer freecell alignment (IMO)

[Eric C. Cooper]

Package: gnome-games
Version: 1:2.8.1-2
Followup-For: Bug #285412

I hacked freecell.scm to put a full card space between the freecells
and homecells, and then align the cards halfway between.

Here's the patch:

--- /usr/share/sol-games/ofreecell.scm	2004-11-19 17:30:59.000000000 -0500
+++ /usr/share/sol-games/freecell.scm	2004-12-13 13:38:25.000000000 -0500
@@ -317,7 +317,8 @@
   (add-normal-slot '())			; 1
   (add-normal-slot '())			; 2
   (add-normal-slot '())			; 3
-  (set! HORIZPOS (+ HORIZPOS 0.25))
+
+  (add-blank-slot)			; separate freecells from homecells
 
   ; homecells
   (add-normal-slot '())			; 4
@@ -326,24 +327,19 @@
   (add-normal-slot '())			; 7
   (add-carriage-return-slot)
 
+  (set! HORIZPOS (+ HORIZPOS 0.5))	; align fields halfway between
+					; freecells or homecells
+
   ; fields
   (add-extended-slot '() down)		; 8
-  (set! HORIZPOS (+ HORIZPOS (/ 1 28)))
   (add-extended-slot '() down)		; 9
-  (set! HORIZPOS (+ HORIZPOS (/ 1 28)))
   (add-extended-slot '() down)		; 10
-  (set! HORIZPOS (+ HORIZPOS (/ 1 28)))
   (add-extended-slot '() down)		; 11
-  (set! HORIZPOS (+ HORIZPOS (/ 1 28)))
   (add-extended-slot '() down)		; 12
-  (set! HORIZPOS (+ HORIZPOS (/ 1 28)))
   (add-extended-slot '() down)		; 13
-  (set! HORIZPOS (+ HORIZPOS (/ 1 28)))
   (add-extended-slot '() down)		; 14
-  (set! HORIZPOS (+ HORIZPOS (/ 1 28)))
   (add-extended-slot '() down)		; 15
 
-  (add-blank-slot)
   (deal-initial-setup)
   (update-auto club 0)
   (update-auto diamond 0)
@@ -352,7 +348,7 @@
 
   (set! board-hash (make-hash-table hash-size))
 
-  (list 8.25 3)
+  (list 9 3)
 )
 
 (define (button-pressed slot card-list)