Репозиторий Sisyphus
Последнее обновление: 1 октября 2023 | Пакетов: 18631 | Посещений: 37039381
en ru br
Репозитории ALT
S:2.3.8-alt1
5.1: 2.1.1-alt7
4.1: 2.1.1-alt7
4.0: 2.1.1-alt7
3.0: 2.1.1-alt6
www.altlinux.org/Changes

Группа :: Интерпретаторы команд
Пакет: tcl-readline

 Главная   Изменения   Спек   Патчи   Исходники   Загрузить   Gear   Bugs and FR  Repocop 

#!/bin/sh
# FILE: "/home/joze/src/tclreadline/sample.tclshrc"
# LAST MODIFICATION: "Thu, 23 Mar 2000 21:13:08 +0100 (joze)"
# (C) 1998 - 2000 by Johannes Zellner, <johannes@zellner.org>
# $Id: sample.tclshrc,v 1.1 2000/07/02 16:30:25 joze Exp $
# vim:set ft=tcl: \
exec tclsh "$0" "$@"


if {$tcl_interactive} {

package require tclreadline

# uncomment the following if block, if you
# want `ls' executed after every `cd'. (This was
# the default up to 0.8 == tclreadline_version.)
#
# if {"" == [info procs cd]} {
# catch {rename ::tclreadline::Cd ""}
# rename cd ::tclreadline::Cd
# proc cd {args} {
# if {[catch {eval ::tclreadline::Cd $args} message]} {
# puts stderr "$message"
# }
# tclreadline::ls
# }
# }

# uncomment the following line to use
# tclreadline's fancy ls proc.
#
# namespace import tclreadline::ls

# tclreadline::Print is on (`yes') by default.
# This mimics the command echoing like in the
# non-readline interactive tclsh.
# If you don't like this, uncomment the following
# line.
#
# tclreadline::Print no

# uncomment the folling line, if you want
# to change tclreadline's print behaviour
# frequently with less typing.
#
# namespace import tclreadline::Print

# store maximal this much lines in the history file
#
set tclreadline::historyLength 200

# disable tclreadline's script completer
#
# ::tclreadline::readline customcompleter ""

# go to tclrealdine's main loop.
#
tclreadline::Loop
}

 
дизайн и разработка: Vladimir Lettiev aka crux © 2004-2005, Andrew Avramenko aka liks © 2007-2008
текущий майнтейнер: Michael Shigorin