https://github.com/openacs/openacs-core/commit/7cbc3e63c6ac6b0ab5647f0d9fdf82fe883ded10
all the best -g