From 4bccd34bcdb44206d9ebc6aee9f0b2169aaaa97c Mon Sep 17 00:00:00 2001
From: Raymond Racine <ray@corwin.bravais.org>
Date: Sun, 23 Mar 2008 11:28:15 -0400
Subject: [PATCH] Updated to use latest version of ECS

---
 rl3/aws/ecs/ecs.sls | 4 ++--
 rl3/scratch.scm     | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/rl3/aws/ecs/ecs.sls b/rl3/aws/ecs/ecs.sls
index 18af3b4..3699645 100644
--- a/rl3/aws/ecs/ecs.sls
+++ b/rl3/aws/ecs/ecs.sls
@@ -48,8 +48,8 @@
   (define ecs-parms
     (lambda (creds)
       `(("Service"        . "AWSECommerceService")
-        ("Version"        . "2007-01-15")         
-        ;;("Associate-Tag"  . ,(aws-credentials-associate-tag creds))
+        ("Version"        . "2008-03-03")         
+        ("Associate-Tag"  . ,(aws-credentials-associate-tag creds))
         ("AWSAccessKeyId" . ,(aws-credentials-access-key creds)))))
     
   (define keyword-search
diff --git a/rl3/scratch.scm b/rl3/scratch.scm
index af282c7..0f27067 100755
--- a/rl3/scratch.scm
+++ b/rl3/scratch.scm
@@ -9,7 +9,7 @@
 
 (with-tasking-io
  (lambda ()
-   (display (pretty-print (keyword-search creds "scheme%20language")))))
+   (display (pretty-print (keyword-search creds "sml%20language")))))
 
 (with-tasking-io
  (lambda ()
-- 
2.11.4.GIT