===================================================================
RCS file: /cvsrepo/anoncvs/cvs/src/usr.bin/tmux/key-bindings.c,v
retrieving revision 1.16
retrieving revision 1.17
diff -c -r1.16 -r1.17
*** src/usr.bin/tmux/key-bindings.c	2009/12/10 09:16:52	1.16
--- src/usr.bin/tmux/key-bindings.c	2010/02/06 22:55:31	1.17
***************
*** 1,4 ****
! /* $OpenBSD: key-bindings.c,v 1.16 2009/12/10 09:16:52 nicm Exp $ */
  
  /*
   * Copyright (c) 2007 Nicholas Marriott <nicm@users.sourceforge.net>
--- 1,4 ----
! /* $OpenBSD: key-bindings.c,v 1.17 2010/02/06 22:55:31 nicm Exp $ */
  
  /*
   * Copyright (c) 2007 Nicholas Marriott <nicm@users.sourceforge.net>
***************
*** 239,245 ****
  void
  key_bindings_dispatch(struct key_binding *bd, struct client *c)
  {
! 	struct cmd_ctx	 	 ctx;
  
  	ctx.msgdata = NULL;
  	ctx.curclient = c;
--- 239,247 ----
  void
  key_bindings_dispatch(struct key_binding *bd, struct client *c)
  {
! 	struct cmd_ctx	 ctx;
! 	struct cmd	*cmd;
! 	int		 readonly;
  
  	ctx.msgdata = NULL;
  	ctx.curclient = c;
***************
*** 249,254 ****
--- 251,266 ----
  	ctx.info = key_bindings_info;
  
  	ctx.cmdclient = NULL;
+ 
+ 	readonly = 1;
+ 	TAILQ_FOREACH(cmd, bd->cmdlist, qentry) {
+ 		if (!(cmd->entry->flags & CMD_READONLY))
+ 			readonly = 0;
+ 	}
+ 	if (!readonly && c->flags & CLIENT_READONLY) {
+ 		key_bindings_info(&ctx, "Client is read-only");
+ 		return;
+ 	}
  
  	cmd_list_exec(bd->cmdlist, &ctx);
  }