Ключевые слова:lock, netscape, crash, (найти похожие документы)
_ RU.UNIX (2:5077/15.22) _____________________________________________ RU.UNIX _
From : Igor Nikolaev 2:5030/266 14 May 99 03:37:12
Subj : lock'и netscape, которые остаются после крашей.
________________________________________________________________________________
Ivan_Tihonov@f140.n5080.z2.fidonet.org wrote:
> IN> Если Вам хочется поставить например серый цвет фона
> IN> для многих программ сразу то проще всего прописать:
> А если вам хочется настоящей зелености в консоли:
> setterm -foreground green -store
setterm - это чисто линуксовая прилада, достойное
место которой в ru.linux. Как правильное
универсальное решение она совершенно не катит.
Я ведь писал в сущности не про раскраску,
а про то как нервы и здоровье поберечь.
Пока не закидывают тухлыми спамопродуктами, продолжу :-)
Вот ещё одна прилада на подобную тему - анализирует
lock'и netscape, которые остаются после крашей.
Инсталлируется при помощи мышки:
cat > /usr/local/bin/netscape
chmod a+x /usr/local/bin/netscape
Предполагается что сама netscape поставлена в
каталог $netscape. Прилада написана после того как
надоело делать rm ~/.netscape/lock. Полезна для
дисплейных классов на X терминалах.
#!/usr/bin/perl
#
# Netscape starter by igor@pu.ru
#
$url = 'file:'.$ENV{'HOME'}.'/.netscape/bookmarks.html';
$netscape = '/usr/local/netscape/netscape';
$new = ' -no-about-splash';
$window = ' -remote "openURL('.$url.',NewWindow)"';
# print "$$\n"; # each program must have debugging :-)
sub testlock {
( undef, $proc ) = split ( ':', $link ); # lock process number
@ps = `/bin/ps -p $proc -o command`; # real program name
# Start addition window if $netscape already started
exec $netscape.$window if ( substr ( $ps[1], 0, -1 ) eq $netscape );
unlink $lock; # remove bad lock
};
#
# Main
#
$lock = $ENV{'HOME'}.'/.netscape/lock';
$link = readlink $lock;
&testlock if ( $link );
# Start netscape
exec $netscape.$new;
--
Игорь Hиколаев
--- ifmail v.2.12.os.sensi * Origin: кусочек libcurses (2:5030/266@fidonet)
