diff options
author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2009-02-27 13:20:52 +0000 |
---|---|---|
committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2009-02-27 13:20:52 +0000 |
commit | 32f9cba1121eb80800cd7b162a74b00c17d71b55 (patch) | |
tree | c1085b2bde7aa1835bdae922755a0b9c2636bfc5 | |
parent | 887b7e6fe2bddfda218b203882c10bbfcbb85ebe (diff) |
revert two small Pascal Web formatting glitches
git-svn-id: svn://tug.org/texlive/trunk@12249 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r-- | Build/source/texk/web2c/alephdir/com16bit-rc2.ch | 4 | ||||
-rw-r--r-- | Build/source/texk/web2c/alephdir/comsrcspec.ch | 2 |
2 files changed, 3 insertions, 3 deletions
diff --git a/Build/source/texk/web2c/alephdir/com16bit-rc2.ch b/Build/source/texk/web2c/alephdir/com16bit-rc2.ch index 42e4faa3f0c..188a9833482 100644 --- a/Build/source/texk/web2c/alephdir/com16bit-rc2.ch +++ b/Build/source/texk/web2c/alephdir/com16bit-rc2.ch @@ -2610,8 +2610,8 @@ if j=18 then print(so(str_pool[str_start(str_ptr)+d])); {N.B.: not |print_char|} end; print(")..."); - if shellenabledp then begin - str_room(1); append_char(0); {Append a null byte to the expansion.} + if shellenabledp then + begin str_room(1); append_char(0); {Append a null byte to the expansion.} clobbered:=false; for d:=0 to cur_length-1 do {Convert to external character set.} begin diff --git a/Build/source/texk/web2c/alephdir/comsrcspec.ch b/Build/source/texk/web2c/alephdir/comsrcspec.ch index 97583491f57..6569431c1c5 100644 --- a/Build/source/texk/web2c/alephdir/comsrcspec.ch +++ b/Build/source/texk/web2c/alephdir/comsrcspec.ch @@ -107,7 +107,7 @@ if shellenabledp then begin wlog('restricted '); end; wlog('\write18 enabled.') - end; +end; if src_specials_p then begin wlog_cr; wlog(' Source specials enabled.') |