# $Id: hook_disk_over.tcl 1169 2019-06-21 07:00:59Z mueller $ # SPDX-License-Identifier: GPL-3.0-or-later # Copyright 2017-2019 by Walter F.J. Mueller # puts "hook: set default diskscheme to over" rlw set diskscheme over