summaryrefslogtreecommitdiffstats
path: root/sca-cpp/trunk/modules/server/server-test.scm
diff options
context:
space:
mode:
Diffstat (limited to 'sca-cpp/trunk/modules/server/server-test.scm')
-rw-r--r--sca-cpp/trunk/modules/server/server-test.scm6
1 files changed, 5 insertions, 1 deletions
diff --git a/sca-cpp/trunk/modules/server/server-test.scm b/sca-cpp/trunk/modules/server/server-test.scm
index 4bbff6e5c2..b9ed6d584c 100644
--- a/sca-cpp/trunk/modules/server/server-test.scm
+++ b/sca-cpp/trunk/modules/server/server-test.scm
@@ -22,7 +22,7 @@
; ATOMPub test case
(define (get id)
- (if (nul id)
+ (if (null? id)
'((feed (title "Sample Feed") (id "123456789") (entry
(((title "Item") (id "111") (content (item (name "Apple") (currencyCode "USD") (currencySymbol "$") (price 2.99))))
((title "Item") (id "222") (content (item (name "Orange") (currencyCode "USD") (currencySymbol "$") (price 3.55))))
@@ -39,6 +39,10 @@
true
)
+(define (patch id item)
+ true
+)
+
(define (delete id)
true
)