Add an `update-hook' configuration tweak.

[ca] / lib / func.tcl

diff --git a/lib/func.tcl b/lib/func.tcl
index ece7e5ba8336f81e2f9070921e1c62d48ea67e9d..04bd20683ed014e665cc764df8ef769344b17ef5 100644 (file)
--- a/lib/func.tcl
+++ b/lib/func.tcl
@@ -86,6 +86,11 @@ array unset P
 set C(ca-period) 3650
 set C(archive-interval) 32
 
 set C(ca-period) 3650
 set C(archive-interval) 32
 

+## The update hook function.
+proc update-hook {} {
+  ## Called by `bin/update': might publish data to a web server, for example.
+}
+

 ## Read the user configuration.
 if {[file exists "$CERTROOT/etc/config.tcl"]} {
   source "$CERTROOT/etc/config.tcl"
 ## Read the user configuration.
 if {[file exists "$CERTROOT/etc/config.tcl"]} {
   source "$CERTROOT/etc/config.tcl"