Switch Desktop Code
January 4, 2007
# yum install wmctrl
# perl -MCPAN -e shell; install X11::WMCtrl
# perl -MCPAN -e shell; install X11::WMCtrl
Then use my ‘LoadWS.pm’ script to dynamically load and position sets of windows based upon the programming environment required…
foreach my $id (keys %upd) {
my $win=$upd{$id};
print “$id -> $$win{title}\n”;
if(exists $$ref{ws}) {
system(”wmctrl -i -r $id -t $$ref{ws}”);
}
}
my $win=$upd{$id};
print “$id -> $$win{title}\n”;
if(exists $$ref{ws}) {
system(”wmctrl -i -r $id -t $$ref{ws}”);
}
}