Update of /project/beirc/cvsroot/beirc In directory clnet:/tmp/cvs-serv778
Modified Files: application.lisp Log Message: remove :gesture :menu to make the right-click presentation menu work again.
--- /project/beirc/cvsroot/beirc/application.lisp 2006/03/16 09:39:08 1.56 +++ /project/beirc/cvsroot/beirc/application.lisp 2006/03/16 19:11:19 1.57 @@ -625,7 +625,6 @@
(define-presentation-to-command-translator nickname-to-ignore-translator (nickname com-ignore beirc - :gesture :menu :menu t :documentation "Ignore this user" :pointer-documentation "Ignore this user" @@ -638,7 +637,6 @@
(define-presentation-to-command-translator nickname-to-unignore-translator (nickname com-unignore beirc - :gesture :menu :menu t :documentation "Unignore this user" :pointer-documentation "Unignore this user" @@ -650,7 +648,6 @@
(define-presentation-to-command-translator nickname-to-focus-translator (nickname com-focus beirc - :gesture :menu :menu t :documentation "Focus this user" :pointer-documentation "Focus this user" @@ -662,7 +659,6 @@
(define-presentation-to-command-translator nickname-to-unfocus-translator (nickname com-unfocus beirc - :gesture :menu :menu t :documentation "Unfocus this user" :pointer-documentation "Unfocus this user" @@ -674,7 +670,6 @@
(define-presentation-to-command-translator nickname-to-query-translator (nickname com-query beirc - :gesture :menu :menu t :documentation "Query this user" :pointer-documentation "Query this user") @@ -683,7 +678,6 @@
(define-presentation-to-command-translator nickname-to-kick-translator (nickname com-kick beirc - :gesture :menu :menu t :documentation "Kick this user" :pointer-documentation "Kick this user") @@ -696,7 +690,6 @@
(define-presentation-to-command-translator nickname-to-ban-nick-translator (nickname com-ban-nick beirc - :gesture :menu :menu t :documentation "Ban this user's nickname" :pointer-documentation "Ban this user's nickname") @@ -705,7 +698,6 @@
(define-presentation-to-command-translator hostmask-to-ban-translator (hostmask com-ban-hostmask beirc - :gesture :menu :menu t :documentation "Ban this hostmask" :pointer-documentation "Ban this hostmask") @@ -714,7 +706,6 @@
(define-presentation-to-command-translator hostmask-to-unban-translator (hostmask com-unban-hostmask beirc - :gesture :menu :menu t :documentation "Unban this hostmask" :pointer-documentation "Unban this hostmask") @@ -723,7 +714,6 @@
(define-presentation-to-command-translator nickname-to-ban-hostmask-translator (nickname com-ban-hostmask beirc - :gesture :menu :menu t :documentation "Ban this user's hostmask" :pointer-documentation "Ban this user's hostmask")