File xtem-8.26.patch of Package xtem
--- xV.tcl
+++ xV.tcl
@@ -17,7 +17,7 @@
set NeedsMinimumTclOlderXtem 7.0
set NeedsMinimumTclThisXtem 8.0
set UpgradeRecommendedTclOlder 8.0
- set TestedUpToTcl 8.3.3
+ set TestedUpToTcl 8.4
set SeemsToBeRunningTcl 8.9
set tclversion [info tclversion]; set patchlevel [info patchlevel]; # the "real version"
--- xi1.tcl
+++ xi1.tcl
@@ -326,91 +326,91 @@
# installation of shell script xtem ---> $BINPATH
-set cmpres [catch "exec cmp $BINPATH/xtem xtem" cmpmes]
-if {[file exists "$BINPATH/xtem"]&&($cmpmes=="")} {# is up to date
- XiProtokoll "\nShell script is up to date: $BINPATH/xtem"
-} else {# must be updated
- if [file writable $BINPATH] {# update can be done
- XiProtokoll "\nInstallation of Shell script: $BINPATH/xtem"
- XiUnlink $BINPATH/xtem; XiLinkSym $INSTPATH/xtem/xtem $BINPATH/xtem
- } else {# needs update, but cannot be updated!
- XiProtokollEnd4 "\n$BINPATH/xtem [XiNotInstalledText]"
- XiProtokollEnd4 "\trm $BINPATH/xtem\n ln -s $INSTPATH/xtem/xtem $BINPATH/xtem" ; XiProtokoll ""
- }
-}
+#set cmpres [catch "exec cmp $BINPATH/xtem xtem" cmpmes]
+#if {[file exists "$BINPATH/xtem"]&&($cmpmes=="")} {# is up to date
+# XiProtokoll "\nShell script is up to date: $BINPATH/xtem"
+#} else {# must be updated
+# if [file writable $BINPATH] {# update can be done
+# XiProtokoll "\nInstallation of Shell script: $BINPATH/xtem"
+# XiUnlink $BINPATH/xtem; XiLinkSym $INSTPATH/xtem/xtem $BINPATH/xtem
+# } else {# needs update, but cannot be updated!
+# XiProtokollEnd4 "\n$BINPATH/xtem [XiNotInstalledText]"
+# XiProtokollEnd4 "\trm $BINPATH/xtem\n ln -s $INSTPATH/xtem/xtem $BINPATH/xtem" ; XiProtokoll ""
+# }
+#}
# installation of program changecode ---> $BINPATH
-if [file exists "changecode"] {
- set cmpres [catch "exec cmp $BINPATH/changecode changecode" cmpmes]
- if {[file exists "$BINPATH/changecode"]&&($cmpmes=="")} {# changecode is up to date
- XiProtokoll "\nProgram is up to date: $BINPATH/changecode"
- } else {# changecode must be updated
- if [file writable $BINPATH] {# update can be done
- XiProtokoll "\nInstallation of program: $BINPATH/changecode"
- XiUnlink $BINPATH/changecode; XiLinkSym $INSTPATH/xtem/changecode $BINPATH/changecode
- } else {# needs update, but cannot be updated!
- XiProtokollEnd4 "\n$BINPATH/changecode [XiNotInstalledText]"
- XiProtokollEnd4 "\trm $BINPATH/changecode\n ln -s $INSTPATH/xtem/changecode $BINPATH/changecode"
- XiProtokoll ""
- }
- }
-} else {# file changecode not found
- XiProtokollEnd4 "\nFile not found: changecode"; XiProtokoll ""
-}
+#if [file exists "changecode"] {
+# set cmpres [catch "exec cmp $BINPATH/changecode changecode" cmpmes]
+# if {[file exists "$BINPATH/changecode"]&&($cmpmes=="")} {# changecode is up to date
+# XiProtokoll "\nProgram is up to date: $BINPATH/changecode"
+# } else {# changecode must be updated
+# if [file writable $BINPATH] {# update can be done
+# XiProtokoll "\nInstallation of program: $BINPATH/changecode"
+# XiUnlink $BINPATH/changecode; XiLinkSym $INSTPATH/xtem/changecode $BINPATH/changecode
+# } else {# needs update, but cannot be updated!
+# XiProtokollEnd4 "\n$BINPATH/changecode [XiNotInstalledText]"
+# XiProtokollEnd4 "\trm $BINPATH/changecode\n ln -s $INSTPATH/xtem/changecode $BINPATH/changecode"
+# XiProtokoll ""
+# }
+# }
+#} else {# file changecode not found
+# XiProtokollEnd4 "\nFile not found: changecode"; XiProtokoll ""
+#}
# installation of program hyphen_show ---> $BINPATH
-if [file exists "hyphen_show"] {
- set cmpres [catch "exec cmp $BINPATH/hyphen_show hyphen_show" cmpmes]
- if {[file exists "$BINPATH/hyphen_show"]&&($cmpmes=="")} {# hyphen_show is up to date
- XiProtokoll "\nProgram is up to date: $BINPATH/hyphen_show"
- } else {# hyphen_show must be updated
- if [file writable $BINPATH] {# update can be done
- XiProtokoll "\nInstallation of program: $BINPATH/hyphen_show"
- XiUnlink $BINPATH/hyphen_show; XiLinkSym $INSTPATH/xtem/hyphen_show $BINPATH/hyphen_show
- } else {# needs update, but cannot be updated!
- XiProtokollEnd4 "\n$BINPATH/hyphen_show [XiNotInstalledText]"
- XiProtokollEnd4 "\trm $BINPATH/hyphen_show\n ln -s $INSTPATH/xtem/hyphen_show $BINPATH/hyphen_show"
- XiProtokoll ""
- }
- }
-} else {# file hyphen_show not found
- XiProtokollEnd4 "\nFile not found: hyphen_show"; XiProtokoll ""
-}
+#if [file exists "hyphen_show"] {
+# set cmpres [catch "exec cmp $BINPATH/hyphen_show hyphen_show" cmpmes]
+# if {[file exists "$BINPATH/hyphen_show"]&&($cmpmes=="")} {# hyphen_show is up to date
+# XiProtokoll "\nProgram is up to date: $BINPATH/hyphen_show"
+# } else {# hyphen_show must be updated
+# if [file writable $BINPATH] {# update can be done
+# XiProtokoll "\nInstallation of program: $BINPATH/hyphen_show"
+# XiUnlink $BINPATH/hyphen_show; XiLinkSym $INSTPATH/xtem/hyphen_show $BINPATH/hyphen_show
+# } else {# needs update, but cannot be updated!
+# XiProtokollEnd4 "\n$BINPATH/hyphen_show [XiNotInstalledText]"
+# XiProtokollEnd4 "\trm $BINPATH/hyphen_show\n ln -s $INSTPATH/xtem/hyphen_show $BINPATH/hyphen_show"
+# XiProtokoll ""
+# }
+# }
+#} else {# file hyphen_show not found
+# XiProtokollEnd4 "\nFile not found: hyphen_show"; XiProtokoll ""
+#}
# man-page installation xtem.1 ---> $MANPATH
-set cmpres [catch "exec cmp $MANPATH/xtem.1 xtem.1" cmpmes]
-if {[file exists "$MANPATH/xtem.1"]&&($cmpmes=="")} {# is up to date
- XiProtokoll "\nMan page is up to date: $MANPATH/xtem.1"
-} else {# must be updated
- if [file writable $MANPATH] {# update can be done
- XiProtokoll "\nInstallation of man page: $MANPATH/xtem.1"
- XiUnlink $MANPATH/xtem.1; XiLinkSym $INSTPATH/xtem/xtem.1 $MANPATH/xtem.1
- } else {# needs update, but cannot be updated!
- XiProtokollEnd4 "\n$MANPATH/xtem.1 [XiNotInstalledText]"
- XiProtokollEnd4 "\trm $MANPATH/xtem.1\n ln -s $INSTPATH/xtem/xtem.1 $MANPATH/xtem.1"; XiProtokoll ""
- }
-}
+#set cmpres [catch "exec cmp $MANPATH/xtem.1 xtem.1" cmpmes]
+#if {[file exists "$MANPATH/xtem.1"]&&($cmpmes=="")} {# is up to date
+# XiProtokoll "\nMan page is up to date: $MANPATH/xtem.1"
+#} else {# must be updated
+# if [file writable $MANPATH] {# update can be done
+# XiProtokoll "\nInstallation of man page: $MANPATH/xtem.1"
+# XiUnlink $MANPATH/xtem.1; XiLinkSym $INSTPATH/xtem/xtem.1 $MANPATH/xtem.1
+# } else {# needs update, but cannot be updated!
+# XiProtokollEnd4 "\n$MANPATH/xtem.1 [XiNotInstalledText]"
+# XiProtokollEnd4 "\trm $MANPATH/xtem.1\n ln -s $INSTPATH/xtem/xtem.1 $MANPATH/xtem.1"; XiProtokoll ""
+# }
+#}
# man-page installation hyphen_show.1 ---> $MANPATH
-set cmpres [catch "exec cmp $MANPATH/hyphen_show.1 hyphen_show.1" cmpmes]
-if {[file exists "$MANPATH/hyphen_show.1"]&&($cmpmes=="")} {# is up to date
- XiProtokoll "\nMan page is up to date: $MANPATH/hyphen_show.1"
-} else {# must be updated
- if [file writable $MANPATH] {# update can be done
- XiProtokoll "\nInstallation of man page: $MANPATH/hyphen_show.1"
- XiUnlink $MANPATH/hyphen_show.1; XiLinkSym $INSTPATH/xtem/hyphen_show.1 $MANPATH/hyphen_show.1
- } else {# needs update, but cannot be updated!
- XiProtokollEnd4 "\n$MANPATH/hyphen_show.1 [XiNotInstalledText]"
- XiProtokollEnd4 "\trm $MANPATH/hyphen_show.1\n ln -s $INSTPATH/xtem/hyphen_show.1 $MANPATH/hyphen_show.1"
- XiProtokoll ""
- }
-}
+#set cmpres [catch "exec cmp $MANPATH/hyphen_show.1 hyphen_show.1" cmpmes]
+#if {[file exists "$MANPATH/hyphen_show.1"]&&($cmpmes=="")} {# is up to date
+# XiProtokoll "\nMan page is up to date: $MANPATH/hyphen_show.1"
+#} else {# must be updated
+# if [file writable $MANPATH] {# update can be done
+# XiProtokoll "\nInstallation of man page: $MANPATH/hyphen_show.1"
+# XiUnlink $MANPATH/hyphen_show.1; XiLinkSym $INSTPATH/xtem/hyphen_show.1 $MANPATH/hyphen_show.1
+# } else {# needs update, but cannot be updated!
+# XiProtokollEnd4 "\n$MANPATH/hyphen_show.1 [XiNotInstalledText]"
+# XiProtokollEnd4 "\trm $MANPATH/hyphen_show.1\n ln -s $INSTPATH/xtem/hyphen_show.1 $MANPATH/hyphen_show.1"
+# XiProtokoll ""
+# }
+#}
# installation of the setting files
--- xteminstall
+++ xteminstall
@@ -26,11 +26,11 @@
# $INSTPATH/xtem-n.nn/xteminstall
# (n.nn being the current version)
-BINPATH="/usr/local/bin" ; # into this directory executeables and shell
+BINPATH="/usr/bin" ; # into this directory executeables and shell
# scripts are copied; must be included in
# search path variable $PATH
-MANPATH="/usr/local/man/man1" ; # into this directory the man-page
+MANPATH="/usr/share/man/man1" ; # into this directory the man-page
# is to be installed
WISHCALL="/usr/bin/wish" ; # command to call wish
@@ -39,7 +39,7 @@
TCLCALL="/usr/bin/tclsh" ; # command to call tclsh
# (Tcl without Tk)
-PRINTCOM="ABORT" ; # print command name list
+PRINTCOM="lpr" ; # print command name list
# (without options, separated by blanks),
# the print commands must exist,if more than 1 element:
# first element will become default printer when
@@ -65,7 +65,7 @@
# each language is enclosed in braces and can
# be followed by any number of synonyms
-DEFLANGUAGE="german" ; # specifies the defaultlanguage
+DEFLANGUAGE="english" ; # specifies the defaultlanguage
CC="gcc" ; # C-compiler for translation of C Programs
@@ -322,8 +322,8 @@
T=" "; echo "$T";echo "$T">>$L
T=" retInstMenu=$retInstMenu "; echo "$T";echo "$T">>$L
T=" "; echo "$T";echo "$T">>$L
-fi
-if [ "$retInstMenu" != "0" ]; then exit 1; fi
+ if [ "$retInstMenu" != "0" ]; then exit 1; fi
+fi
################################################################################
