X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=ecmalisp.html;h=9610883569ef686b175411dfb6060b1ff34f14e2;hb=24ccbdeee987c9e08653acf198f708017913100d;hp=378eb995398cf18bb1b309c5ec6f53157e043447;hpb=27b28c455b4bdfb03dd5db5e63a9b9c1cd233cbb;p=jscl.git

diff --git a/ecmalisp.html b/ecmalisp.html
index 378eb99..9610883 100644
--- a/ecmalisp.html
+++ b/ecmalisp.html
@@ -77,23 +77,23 @@
 
         var startPrompt = function () {
           // Start the prompt with history enabled.
-          jqconsole.Write(lisp.evalString('(CL:PACKAGE-NAME CL:*PACKAGE*)') + '> ', 'jqconsole-prompt');
+          jqconsole.Write(lisp.evalString(id, '(CL:PACKAGE-NAME CL:*PACKAGE*)') + '> ', 'jqconsole-prompt');
           jqconsole.Prompt(true, function (input) {
             // Output input with the class jqconsole-return.
             if (input[0] != ','){
                 try {
-                    jqconsole.Write(lisp.print(lisp.evalString(input)) + '\n', 'jqconsole-return');
+                    jqconsole.Write(lisp.print(id, lisp.evalString(id, input)) + '\n', 'jqconsole-return');
                 } catch(error) {
                     jqconsole.Write('ERROR: ' + (error.message || error) + '\n', 'jqconsole-error');
                 }
             } else {
-                jqconsole.Write(lisp.compileString(input.slice(1)) + '\n', 'jqconsole-return');
+                jqconsole.Write(lisp.compileString(id, input.slice(1)) + '\n', 'jqconsole-return');
             }
             // Restart the prompt.
             startPrompt();
           }, function(input){
             try {
-                lisp.read(input[0]==','? input.slice(1): input);
+                lisp.read(id, input[0]==','? input.slice(1): input);
             } catch(error) {
                 return 0;
             }