Репозитории 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 |
Группа :: Интерпретаторы команд
Пакет: tcl-readline
Главная Изменения Спек Патчи Sources Загрузить Gear Bugs and FR Repocop
Патч: tclreadline-2.1.0-sf-completer.patch
Скачать
Скачать
*** tclreadlineCompleter.tcl.orig Mon Jul 15 01:59:12 2002
--- tclreadlineCompleter.tcl Mon Jul 15 02:02:21 2002
***************
*** 625,631 ****
}
}
}
! if {![catch [list set type [image type ${cmd}]]]} {
switch -- ${type} {
photo {
set result [PhotoObj ${text} ${start} ${end} ${line} ${pos}]
--- 625,631 ----
}
}
}
! if {![catch {image type ${cmd}} type]} {
switch -- ${type} {
photo {
set result [PhotoObj ${text} ${start} ${end} ${line} ${pos}]
***************
*** 1460,1466 ****
# this can raise an error, if alias is
# no valid command.
#
! if {[catch [list set alias [namespace origin $alias]]]} {
return ""
}
--- 1460,1466 ----
# this can raise an error, if alias is
# no valid command.
#
! if {[catch {set alias [namespace origin $alias]}]} {
return ""
}