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

( require 'ox-publish )

( defun publication-builder ()
  ( let ( ( success-report "Build complete!" ) )
    ( list
      :success-report
      ( lambda ()
        ( message success-report )
        ( ) ) ) ) )

( setq publish
  ( plist-get ( publication-builder ) :success-report ) )

( funcall publish )