summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorPeter Breitenlohner <peb@mppmu.mpg.de>2009-02-27 13:20:52 +0000
committerPeter Breitenlohner <peb@mppmu.mpg.de>2009-02-27 13:20:52 +0000
commit32f9cba1121eb80800cd7b162a74b00c17d71b55 (patch)
treec1085b2bde7aa1835bdae922755a0b9c2636bfc5
parent887b7e6fe2bddfda218b203882c10bbfcbb85ebe (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.ch4
-rw-r--r--Build/source/texk/web2c/alephdir/comsrcspec.ch2
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.')