Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Changes In Branch bug-3601370-td Excluding Merge-Ins
This is equivalent to a diff from b3b52828b9 to 6606f5686a
2013-01-29
| ||
18:58 | Merged doctools fixes (bug 3601370 branch) into release. Updated README. check-in: 513786f1e5 user: andreask tags: tcllib-1-15-rc | |
2013-01-21
| ||
20:12 | Added check to manpage_begin, reject spaces in title. Message catalogs extended with new warning 'mptitle' for spaces in the manpage title. The french catalog contains the english text, and needs a translation. Closed-Leaf check-in: 6606f5686a user: andreask tags: bug-3601370-td | |
19:37 | [Bug 3433470] Regenerated the certificates, again. Expiry is Jan 2023 (10 years). While SimpleCA doesn't seem to allow me to specify a longer period in the GUI it was possible to get, update and run the Tcl code, unwrapped. Further changed to 4096-bit certs. --- Broken --- Investigation points to me setting the root cert validity period to 100 years as the cause, possibly invoking y2038 troubles in Tcl and/or openssl. check-in: 7b80198969 user: andreask | |
2013-01-18
| ||
15:50 | Fix incorrect copyright filter regexp in [4245d06151] check-in: 1e0a86a422 user: TrevorD tags: bug-3601370-td | |
12:29 | Spaces removed from man page names (replaced with underscore) to prevent illegal nroff output (bug-3601370 issue 7) check-in: decbb9d0fa user: TrevorD tags: bug-3601370-td | |
2013-01-09
| ||
20:50 | Opened the Tcllib 1.15 Release Candidate Branch check-in: a6b3c1bd6e user: andreask tags: tcllib-1-15-rc | |
20:37 | [Bug 3598183] (irc) Documented the callback for EOF as required. check-in: b3b52828b9 user: andreask tags: trunk | |
20:24 | (::mime::buildmessage): [Bug 3565267]: Handle possibility of 'errorCode' not set. Version bumped to 1.5.6. check-in: ea86982e87 user: andreask tags: trunk | |
Changes to modules/doctools/ChangeLog.
|
Changes to modules/doctools/checker.tcl.
︙ | |||
267 268 269 270 271 272 273 274 275 276 277 278 279 280 | 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 | + | } # ------------------------------------------------------------- # Formatting commands proc manpage_begin {title section version} { Enter manpage_begin if {[IsNot manpage_begin]} {Error mpbegin} if {[string match {* *} $title]} {Error mptitle} Go header fmt_manpage_begin $title $section $version } proc moddesc {desc} { Enter moddesc if {[IsNot header]} {Error hdrcmd} fmt_moddesc $desc |
︙ |
Changes to modules/doctools/mpformats/_common.tcl.
︙ | |||
71 72 73 74 75 76 77 | 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 | + + + + + + + + - + + + + + | proc c_get_copyright {} { global state set cc $state(copyright) if {$cc == {}} {set cc [dt_copyright]} if {$cc == {}} {return {}} set stmts {} set re {^Copyright +(?:\(c\)|\\\(co|©)? *(.+)$} foreach stmt $cc { if { [string equal -nocase "public domain" [string trim $stmt]] } { lappend stmts "Public domain" } elseif { [regexp -nocase -- $re $stmt -> stmt] } { lappend stmts $stmt } else { |
︙ |
Changes to modules/doctools/mpformats/_nroff.tcl.
1 2 3 4 5 6 7 8 9 10 | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 | - - - + + + + - + - + - + - - - - - - - - - - - - + + + + + + + + + + + + - - + + - + - + - + - + + + | # -*- tcl -*- # # -- nroff commands # # Copyright (c) 2003-2005 Andreas Kupries <[email protected]> ################################################################ # nroff specific commands # |
︙ | |||
124 125 126 127 128 129 130 131 132 | 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 | + + + - - - - - - + + + + + + + | if {[regexp {^\x1\\f[BI]\.} $line]} { # We found confusing formatting at the beginning of # the current line. We lift this line up and attach it # at the end of the last line to remove this # irregularity. Note that the regexp has to look for # the special 0x01 character as well to be sure that # the sequence in question truly is formatting. # [bug-3601370] Only lift & attach if last line is not # a directive set last [lindex $lines end] if { ! [string match "\1.*" $last] } { |
︙ | |||
156 157 158 159 160 161 162 | 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 | - - + + | set lines [join $lines "\n"] # Remove superfluous .IP commands (empty paragraph). The first # identity mapping is there to avoid smashing a man macro # definition. set lines [string map [list \ |
Changes to modules/doctools/mpformats/c.msg.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | + | # -*- tcl -*- package require msgcat namespace import ::msgcat::* mcset c end/open/list "End of manpage reached, \[list_end\] missing" mcset c end/open/example "End of manpage reached, \[example_end\] missing" mcset c end/open/mp "End of manpage reached, \[manpage_end\] missing" mcset c mpbegin "Command must be first of manpage" mcset c mptitle "Spaces not allowed in manpage title" mcset c hdrcmd "Command not allowed outside of the header section" mcset c bodycmd "Command not allowed outside of the body of the manpage" mcset c body "Plain text not allowed outside of the body of the manpage" mcset c reqcmd "Command not allowed outside of header or requirement section" mcset c invalidlist "Invalid list type \"@\"" mcset c nolistcmd "Command not allowed inside of a list" mcset c nolisthdr "Command not allowed between beginning of a list and its first item" |
︙ |
Changes to modules/doctools/mpformats/de.msg.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | + | # -*- tcl -*- package require msgcat namespace import ::msgcat::* mcset de end/open/list "Dokument zu Ende, nicht alle Listen wurden geschlossen" mcset de end/open/example "Dokument zu Ende, das letzte Beispiel wurde nicht abgeschlossen" mcset de end/open/mp "Dokument zu Ende, es fehlt der Abschlussbefehl \[manpage_end\]" mcset de mpbegin "Erwartete diesen Befehl als ersten in der Manpage" mcset de mptitle "Der Manpage Titel darf keine Leerzeichen enthalten" mcset de hdrcmd "Dieser Befehl ist ausserhalb des Headers nicht erlaubt" mcset de bodycmd "Dieser Befehl darf nicht ausserhalb des Hauptteils der Manpage auftreten" mcset de body "Text darf nicht ausserhalb des Hauptteils der Manpage auftreten" mcset de reqcmd "Dieser Befehl ist ausserhalb von Header/Requirements nicht erlaubt" mcset de invalidlist "Die Listenart \"@\" ist dem System nicht bekannt" mcset de nolistcmd "Dieser Befehl ist innerhalb einer Liste nicht erlaubt" mcset de nolisthdr "Dieser Befehl darf nicht zwischen dem Beginn einer Liste und ihrem ersten Unterpunkt benutzt werden" |
︙ |
Changes to modules/doctools/mpformats/en.msg.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | + | # -*- tcl -*- package require msgcat namespace import ::msgcat::* mcset en end/open/list "End of manpage reached, \[list_end\] missing" mcset en end/open/example "End of manpage reached, \[example_end\] missing" mcset en end/open/mp "End of manpage reached, \[manpage_end\] missing" mcset en mpbegin "Command must be first of manpage" mcset en mptitle "Spaces not allowed in manpage title" mcset en hdrcmd "Command not allowed outside of the header section" mcset en bodycmd "Command not allowed outside of the body of the manpage" mcset en body "Plain text not allowed outside of the body of the manpage" mcset en reqcmd "Command not allowed outside of header or requirement section" mcset en invalidlist "Invalid list type \"@\"" mcset en nolistcmd "Command not allowed inside of a list" mcset en nolisthdr "Command not allowed between beginning of a list and its first item" |
︙ |
Changes to modules/doctools/mpformats/fmt.nroff.
︙ | |||
80 81 82 83 84 85 86 | 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 | - + + + + + | if {[llength $sa] > 0} { append nroff [fmt_section {SEE ALSO}] \n append nroff [join [lsort $sa] ", "] \n } if {[llength $kw] > 0} { append nroff [fmt_section KEYWORDS] \n |
︙ |
Changes to modules/doctools/mpformats/fr.msg.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | + | # -*- tcl -*- package require msgcat namespace import ::msgcat::* mcset fr end/open/list "Fin de la page de manuel atteinte, \[list_end\] manquant" mcset fr end/open/example "Fin de la page de manuel atteinte, \[example_end\] manquant" mcset fr end/open/mp "Fin de la page de manuel atteinte, \[manpage_end\] manquant" mcset fr mpbegin "Cette commande doit \xEAtre la premi\xE8re de la page de manuel" mcset fr mptitle "TODO: TRANSLATE: Spaces not allowed in manpage title" mcset fr hdrcmd "Commande interdite \xE0 l'ext\xE9rieur de l'en-t\xEAte" mcset fr bodycmd "Commande interdite \xE0 l'ext\xE9rieur du corps de la page de manuel" mcset fr body "Le texte est interdit \xE0 l'ext\xE9rieur du corps de la page de manuel" mcset fr reqcmd "Commande interdite \xE0 l'ext\xE9rieur de l'en-t\xEAte ou de la section de condition" mcset fr invalidlist "Type de liste non valide \"@\"" mcset fr nolistcmd "Commande interdite \xE0 l'int\xE9rieur d'une liste" mcset fr nolisthdr "Commande interdite entre le d\xE9but d'une liste et son premier \xE9l\xE9ment" |
︙ |
Changes to modules/ldap/ldap.man.
︙ | |||
217 218 219 220 221 222 223 | 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 | - + | [para] [call [cmd ::ldap::searchEnd] [arg handle]] This command terminates a LDAP search initiated |
︙ |
Changes to modules/pop3/pop3.man.
︙ | |||
44 45 46 47 48 49 50 | 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 | - + | [opt_def -msex boolean] Setting this option tells the package that the server we are talking to is an MS Exchange server (which has some oddities we have to work around). The default is [const False]. |
︙ |
Changes to modules/struct/graph1.man.
1 | 1 2 3 4 5 6 7 8 9 | - + | [comment {-*- tcl -*-}] |
︙ |
Changes to modules/struct/matrix1.man.
1 | 1 2 3 4 5 6 7 8 9 | - + | [comment {-*- tcl -*-}] |
︙ |
Changes to modules/struct/struct_tree1.man.
1 | 1 2 3 4 5 6 7 8 9 | - + | [comment {-*- tcl -*-}] |
︙ |
Changes to sak.tcl.
1 2 3 4 5 6 7 8 9 | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | - + | #!/bin/sh # -*- tcl -*- \ exec tclsh "$0" ${1+"$@"} # -------------------------------------------------------------- # Perform various checks and operations on the distribution. # SAK = Swiss Army Knife. set distribution [file dirname [info script]] |
︙ |