--- a/contrib/hgk
+++ b/contrib/hgk
@@ -465,6 +465,7 @@ proc makewindow {} {
bindkey ? findprev
bindkey f nextfile
bind . <Control-q> doquit
+ bind . <Control-w> doquit
bind . <Control-f> dofind
bind . <Control-g> {findnext 0}
bind . <Control-r> findprev