How to I read from the stdin input stream from inside Emacs?

How to I read from the stdin input stream from inside Emacs?

[Davin Pearson]

I have the following command in my Makefile:

foo:
     javac *.java |& emacs --batch --load sjs-error.el --funcall doit

I have tried the following code but it doesn't work:

(defun doit ()
   (while (input-pending-p)
     (message (format "input %s" last-input-event))))

 I also tried the following code but it doesn't work:

(defun doit ()
  (while (input-pending-p)
    (message (read-key-sequence))))

Please could one of you braniacs come up with some code that works!

Re: How to I read from the stdin input stream from inside Emacs?

[John Mastro]

> I have the following command in my Makefile:
>
> foo:
>      javac *.java |& emacs --batch --load sjs-error.el --funcall doit
>
> I have tried the following code but it doesn't work:
>
> (defun doit ()
>    (while (input-pending-p)
>      (message (format "input %s" last-input-event))))
>
>  I also tried the following code but it doesn't work:
>
> (defun doit ()
>   (while (input-pending-p)
>     (message (read-key-sequence))))
>
> Please could one of you braniacs come up with some code that works!

You could use something like this:

(defun doit ()
  (let (line)
    (while (setq line (read-from-minibuffer ""))
      (message "input: %s" line))))

In batch mode, Emacs essentially treats stdin as minibuffer input.

-- 
john