diff options
author | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-01-21 00:34:21 +0100 |
---|---|---|
committer | Marek Paśnikowski <marek@marekpasnikowski.pl> | 2024-01-21 00:34:21 +0100 |
commit | 33182646943245b1e41d8dfc73dc620811ff342c (patch) | |
tree | e249f71ed9a8ebb862beaef80f42f625ad7f400c /www/www-test-data.el | |
parent | e0cffe169199f745ae269fb294912dc95d0318d9 (diff) |
Implement input sanitationmuseum-first-oop-elisp
To the best of my current ability, implement checks and guards on the given
inputs.
Diffstat (limited to 'www/www-test-data.el')
-rw-r--r-- | www/www-test-data.el | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/www/www-test-data.el b/www/www-test-data.el index f6ef8aa..ddafd01 100644 --- a/www/www-test-data.el +++ b/www/www-test-data.el @@ -5,15 +5,12 @@ ( print "publish-test-1" ) ( let ( ( publication-instance ( publication-object ) ) ) - ( publish publication-instance - :data-projects ( list "test.pl" "example.org" ) ) ) + ( publish publication-instance ( list "test.pl" "example.org" ) ) ) ( print "publish-test-2" ) ( let ( ( publication-instance ( publication-object ) ) ) ( publish publication-instance - - :data-projects ( list "test.pl" :property1 @@ -25,7 +22,8 @@ ( print "publish-test-3" ) ( let ( ( publication-instance ( publication-object ) ) ) - ( publish publication-instance "test.pl" + ( publish publication-instance + ( list "test.pl" - :components - ( list "example.pl" "example.org" ) ) ) + :components + ( list "example.pl" "example.org" )) ) ) |