[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: system default shell

From: Steve Tell
Subject: Re: system default shell
Date: Sun, 14 Oct 2001 00:48:08 -0400 (EDT)

On Sat, 13 Oct 2001, David Pirotte wrote:

> Steve Tell wrote:
> > 
> > On Fri, 12 Oct 2001, David Pirotte wrote:
> > How about
> >    (write-char #\bel)
> tried, but didn't work, thanks anyway
> so, i tried
>       (system "beep")
>       (system "bash -c 'beep'")
>       (write-char #\bel)

Could you perhaps have redirected the unix stdout or guile current-output
to someplace besides the terminal?

Under guile-1.4, 
        guile -c '(write-char #\bel)'
beeps for me, and  
        guile -c '(write-char #\bel)' | od -b
shows that a control-G is definitely getting sent to stdout.

Perhaps somthing like this:

(let ((p (open-output-file "/dev/tty")))
  (write-char #\bel p)
  (close-port p))

Of course all of these methods assume that your program is running in a
typical unix command-line environment where there even is a controlling
tty.  If, on the other hand you're in a Gtk+ environment, there's
gdk_beep() (assuming it has a guile-gtk binding).  I imagine it simply
calls xlib's XBeep().

Steve Tell  address@hidden 

reply via email to

[Prev in Thread] Current Thread [Next in Thread]