Changeset 4964


Ignore:
Timestamp:
12/04/03 14:57:28 (18 years ago)
Author:
piso
Message:

Set line flags so we can find next/previous prompt.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/j/src/org/armedbear/j/LispShell.java

    r4946 r4964  
    33 *
    44 * Copyright (C) 2002-2003 Peter Graves
    5  * $Id: LispShell.java,v 1.48 2003-12-02 20:17:58 piso Exp $
     5 * $Id: LispShell.java,v 1.49 2003-12-04 14:57:28 piso Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    145145            return; // For now.
    146146        }
    147         dotLine.setFlags(STATE_INPUT);
     147        if (dotLine.flags() != STATE_PROMPT)
     148            dotLine.setFlags(STATE_INPUT);
    148149        Position end = editor.getBuffer().getEnd();
    149150        Position pos = LispMode.findContainingSexp(end);
     
    177178    {
    178179        if (resetCommand != null) {
    179             Editor.currentEditor().getDotLine().setFlags(STATE_INPUT);
     180            Line line = Editor.currentEditor().getDotLine();
     181            if (line.flags() != STATE_PROMPT)
     182                line.setFlags(STATE_INPUT);
    180183            appendString(resetCommand.concat("\n"));
    181184            send(resetCommand);
Note: See TracChangeset for help on using the changeset viewer.