[pure-lang-svn] SF.net SVN: pure-lang: [221] pure/trunk/pure-mode.el.in

[<ag...@us...>]

Revision: 221
          http://pure-lang.svn.sourceforge.net/pure-lang/?rev=221&view=rev
Author:   agraef
Date:     2008-06-14 00:41:05 -0700 (Sat, 14 Jun 2008)

Log Message:
-----------
Suppress paging and sign-on message when running the Pure interpreter.

Modified Paths:
--------------
    pure/trunk/pure-mode.el.in

Modified: pure/trunk/pure-mode.el.in
===================================================================
--- pure/trunk/pure-mode.el.in	2008-06-14 07:32:48 UTC (rev 220)
+++ pure/trunk/pure-mode.el.in	2008-06-14 07:41:05 UTC (rev 221)
@@ -597,8 +597,9 @@
 	      (comint-read-input-ring t))))
       (goto-char (point-max))
       ;; invoke the interpreter
+      (setenv "PURE_MORE" nil) ; disable paging in the interpreter
       (comint-exec pure-eval-buffer "pure-eval" pure-prog-name nil
-		   (append (list "-i") args))
+		   (append (list "-q" "-i") args))
       ;; set up process parameters
       (setq pure-output-list nil
 	    pure-output-string nil


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.