;; -*- lexical-binding: t; -*-

( load "~/src/channel/www/build-site" )

( print "publish-test-1" )

( let ( ( publication-instance ( publication-object ) ) )
  ( publish publication-instance
    :data-projects ( list "test.pl" "example.org" ) ) )

( print "publish-test-2" )

( let ( ( publication-instance ( publication-object ) ) )
  ( publish publication-instance

    :data-projects
    ( list "test.pl"

      :property1
      "value1"

      :property2
      "value2" ) ) )

( print "publish-test-3" )

( let ( ( publication-instance ( publication-object ) ) )
  ( publish publication-instance "test.pl"

    :components
    ( list "example.pl" "example.org" ) ) )