Diff
Not logged in

Differences From Artifact [d234ad5a9b]:

To Artifact [26541f9376]:


     1      1   #!/bin/sh
     2         -# FILE: "/diska/home/joze/src/tclreadline/sample.tclshrc"
     3         -# LAST MODIFICATION: "Mon Aug 23 17:50:54 1999 (joze)"
            2  +# FILE: "/home/joze/src/tclreadline/sample.tclshrc"
            3  +# LAST MODIFICATION: "Sat Aug 28 23:41:17 1999 (joze)"
     4      4   # (C) 1999 by Johannes Zellner, <johannes@zellner.org>
     5      5   # $Id$
     6      6   # vim:set ft=tcl: \
     7      7   exec tclsh "$0" "$@"
     8      8   
     9      9   
    10     10   if {$tcl_interactive} {
................................................................................
    40     40       # tclreadline::Print no
    41     41   
    42     42       # uncomment the folling line, if you want
    43     43       # to change tclreadline's print behaviour
    44     44       # frequently with less typing.
    45     45       #
    46     46       # namespace import tclreadline::Print
           47  +
           48  +    # store maximal this much lines in the history file
           49  +    #
           50  +    set tclreadline::historyLength 200
    47     51   
    48     52       # go to tclrealdine's main loop.
    49     53       #
    50     54       tclreadline::Loop
    51     55   }
    52     56