# $Id: hook_disk_over.tcl 871 2017-04-09 15:19:11Z mueller $ puts "hook: set default diskscheme to over" rlw set diskscheme over