diff options
| -rw-r--r-- | lib/Xconfig/glx.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/Xconfig/glx.pm b/lib/Xconfig/glx.pm index afad639..45bef17 100644 --- a/lib/Xconfig/glx.pm +++ b/lib/Xconfig/glx.pm @@ -215,9 +215,12 @@ sub detect_types { } sub choose_interactive { - my ($in, $glx) = @_; + my ($in, $glx, $o_installed_only) = @_; my ($available, $type) = detect_types($glx); + @$available = grep { + !$_->{wms} || -e '/usr/bin/' . first(@{$_->{wms}}) + } @$available if $o_installed_only; $in->ask_from_({ title => N("3D Desktop effects") }, [ { label => N("3D Desktop effects"), title => 1 }, |