diff options
| author | sobomax <sobomax@FreeBSD.org> | 2001-08-29 00:48:30 +0800 |
|---|---|---|
| committer | sobomax <sobomax@FreeBSD.org> | 2001-08-29 00:48:30 +0800 |
| commit | 19bb544a2819d1fd664c08294513b02cbb978c19 (patch) | |
| tree | b852041538475a2e83823c23dc7407189506a693 | |
| parent | 0f35e443417d18579de893c1fbfead2709d69e20 (diff) | |
| download | freebsd-ports-gnome-19bb544a2819d1fd664c08294513b02cbb978c19.tar.gz freebsd-ports-gnome-19bb544a2819d1fd664c08294513b02cbb978c19.tar.zst freebsd-ports-gnome-19bb544a2819d1fd664c08294513b02cbb978c19.zip | |
Fix bug with passing mouse clicks to the root window.
PR: 29973
Submitted by: Joe Marcus Clarke <marcus@marcuscom.com>
| -rw-r--r-- | x11-wm/sawfish/Makefile | 1 | ||||
| -rw-r--r-- | x11-wm/sawfish/files/patch-lisp::sawfish::wm::state::gnome.jl | 21 | ||||
| -rw-r--r-- | x11-wm/sawfish2/Makefile | 1 | ||||
| -rw-r--r-- | x11-wm/sawfish2/files/patch-lisp::sawfish::wm::state::gnome.jl | 21 |
4 files changed, 44 insertions, 0 deletions
diff --git a/x11-wm/sawfish/Makefile b/x11-wm/sawfish/Makefile index ad6eb440396d..f60633a1952c 100644 --- a/x11-wm/sawfish/Makefile +++ b/x11-wm/sawfish/Makefile @@ -7,6 +7,7 @@ PORTNAME= sawfish PORTVERSION= 1.0 +PORTREVISION= 1 CATEGORIES= x11-wm MASTER_SITES= ${MASTER_SITE_SOURCEFORGE} MASTER_SITE_SUBDIR= sawmill diff --git a/x11-wm/sawfish/files/patch-lisp::sawfish::wm::state::gnome.jl b/x11-wm/sawfish/files/patch-lisp::sawfish::wm::state::gnome.jl new file mode 100644 index 000000000000..12613735f003 --- /dev/null +++ b/x11-wm/sawfish/files/patch-lisp::sawfish::wm::state::gnome.jl @@ -0,0 +1,21 @@ + +$FreeBSD$ + +--- lisp/sawfish/wm/state/gnome.jl.orig Fri May 4 10:41:32 2001 ++++ lisp/sawfish/wm/state/gnome.jl Tue Aug 28 19:42:30 2001 +@@ -1,5 +1,5 @@ + ;; gnome.jl -- minimal GNOME compliance +-;; $Id: gnome.jl,v 1.72 2001/05/04 07:41:32 jsh Exp $ ++;; $Id: gnome.jl,v 1.73 2001/07/24 04:37:14 jsh Exp $ + + ;; Copyright (C) 1999 John Harper <john@dcs.warwick.ac.uk> + +@@ -321,7 +321,7 @@ + (let ((event (event-name (current-event)))) + ;; only proxy Click1 or Off events, and only if we don't have + ;; a binding for an event that may follow in the same grab +- (cond ((and (string-match "^(.*)-Click1$" event) ++ (cond ((and (string-match "^(.*)-Click\\d?$" event) + (let ((mirror (lookup-event + (expand-last-match "\\1-Off")))) + (not (or (search-keymap mirror global-keymap) diff --git a/x11-wm/sawfish2/Makefile b/x11-wm/sawfish2/Makefile index ad6eb440396d..f60633a1952c 100644 --- a/x11-wm/sawfish2/Makefile +++ b/x11-wm/sawfish2/Makefile @@ -7,6 +7,7 @@ PORTNAME= sawfish PORTVERSION= 1.0 +PORTREVISION= 1 CATEGORIES= x11-wm MASTER_SITES= ${MASTER_SITE_SOURCEFORGE} MASTER_SITE_SUBDIR= sawmill diff --git a/x11-wm/sawfish2/files/patch-lisp::sawfish::wm::state::gnome.jl b/x11-wm/sawfish2/files/patch-lisp::sawfish::wm::state::gnome.jl new file mode 100644 index 000000000000..12613735f003 --- /dev/null +++ b/x11-wm/sawfish2/files/patch-lisp::sawfish::wm::state::gnome.jl @@ -0,0 +1,21 @@ + +$FreeBSD$ + +--- lisp/sawfish/wm/state/gnome.jl.orig Fri May 4 10:41:32 2001 ++++ lisp/sawfish/wm/state/gnome.jl Tue Aug 28 19:42:30 2001 +@@ -1,5 +1,5 @@ + ;; gnome.jl -- minimal GNOME compliance +-;; $Id: gnome.jl,v 1.72 2001/05/04 07:41:32 jsh Exp $ ++;; $Id: gnome.jl,v 1.73 2001/07/24 04:37:14 jsh Exp $ + + ;; Copyright (C) 1999 John Harper <john@dcs.warwick.ac.uk> + +@@ -321,7 +321,7 @@ + (let ((event (event-name (current-event)))) + ;; only proxy Click1 or Off events, and only if we don't have + ;; a binding for an event that may follow in the same grab +- (cond ((and (string-match "^(.*)-Click1$" event) ++ (cond ((and (string-match "^(.*)-Click\\d?$" event) + (let ((mirror (lookup-event + (expand-last-match "\\1-Off")))) + (not (or (search-keymap mirror global-keymap) |