Recover lost basic in help indentation

regression from...

commit 6614bedceadcc07ec082c5e926107f27903bda5c
Date:   Mon Jan 25 20:07:10 2016 +0100

fix validation errors by round-trip through helpauthoring extension

with git show 6614bedceadcc07ec082c5e926107f27903bda5c | ~/recoverindent.py

import fileinput
import re
import sys

added = []
removed = []
filename = ""

def processlastfile(filename, added, removed):
if len(added) != len(removed):
print "BROKEN"
sys.exit(-2)
if len(removed):
f = open(filename, "rw")
linestring = open(filename, "r").read()
start = 0
for x in range(0, len(added)):
if added[x] == removed[x]:
continue
if added[x].strip() != removed[x].strip():
print "BROKEN"
sys.exit(-2)
if filename == "source/text/sbasic/shared/03080301.xhp" and x == 6:
print "skipping special hunk", removed[x], "in source/text/sbasic/shared/03080301.xhp"
else:
start = linestring.find(added[x], start)
if start == -1:
print "BROKEN"
sys.exit(-2)
linestring = linestring[0:start] + removed[x] + linestring[start + len(added[x]):]
start = start + len(removed[x])
open(filename, "w").write(linestring)

for line in fileinput.input():
if line.startswith("--- a/"):
if filename is not "":
processlastfile(filename, added, removed)
added = []
removed = []
filename = line[6:-1]
elif "role=\"bascode\"" in line:
m = re.search('>(.+?)<', line)
code = m.group(1)
if line.startswith("-"):
removed.append(code)
else:
added.append(code)

processlastfile(filename, added, removed)

which puts the code back the way it was, except for one string
which had changed and was fixed manually afterwards

Change-Id: Ic67abf36bb5d27be58a51ebbf5022830f56dcb37

1 files changed, 17 insertions, 17 deletions

diff --git a/source/text/sbasic/shared/03050500.xhp b/source/text/sbasic/shared/03050500.xhp
index 1b1c216b5e..855128baa9 100644
--- a/source/text/sbasic/shared/03050500.xhp
+++ b/source/text/sbasic/shared/03050500.xhp
@@ -59,24 +59,24 @@
 <paragraph id="par_idm1341124240" role="bascode" localize="false" xml-lang="en-US">Dim iCount As Integer</paragraph>
 <paragraph id="par_idm1341123008" role="bascode" localize="false" xml-lang="en-US">Dim sLine As String</paragraph>
 <paragraph id="par_idm1341121776" role="bascode" localize="false" xml-lang="en-US">Dim aFile As String</paragraph>
-<paragraph id="par_idm1341120544" role="bascode" localize="false" xml-lang="en-US"> aFile = "c:\data.txt"</paragraph>
-<paragraph id="par_idm1341119296" role="bascode" localize="false" xml-lang="en-US"> iNumber = Freefile</paragraph>
-<paragraph id="par_idm1341118064" role="bascode" localize="false" xml-lang="en-US"> Open aFile For Output As #iNumber</paragraph>
-<paragraph id="par_id3153876" role="bascode" xml-lang="en-US"> Print #iNumber, "This is a line of text"</paragraph>
-<paragraph id="par_idm1341115072" role="bascode" localize="false" xml-lang="en-US"> Close #iNumber</paragraph>
-<paragraph id="par_idm1341113840" role="bascode" localize="false" xml-lang="en-US"> iNumber = Freefile</paragraph>
-<paragraph id="par_idm1341112608" role="bascode" localize="false" xml-lang="en-US"> Open aFile For Input As iNumber</paragraph>
-<paragraph id="par_idm1341111360" role="bascode" localize="false" xml-lang="en-US"> For iCount = 1 To 5</paragraph>
-<paragraph id="par_idm1341110128" role="bascode" localize="false" xml-lang="en-US"> Line Input #iNumber, sLine</paragraph>
-<paragraph id="par_idm1341108880" role="bascode" localize="false" xml-lang="en-US"> If sLine &lt;&gt;"" Then</paragraph>
-<paragraph id="par_idm1341107632" role="bascode" localize="false" xml-lang="en-US"> Rem</paragraph>
-<paragraph id="par_idm1341106400" role="bascode" localize="false" xml-lang="en-US"> End If</paragraph>
-<paragraph id="par_idm1341105168" role="bascode" localize="false" xml-lang="en-US"> Next iCount</paragraph>
-<paragraph id="par_idm1341103936" role="bascode" localize="false" xml-lang="en-US"> Close #iNumber</paragraph>
-<paragraph id="par_idm1341102704" role="bascode" localize="false" xml-lang="en-US"> Exit Sub</paragraph>
+<paragraph id="par_idm1341120544" role="bascode" localize="false" xml-lang="en-US">    aFile = "c:\data.txt"</paragraph>
+<paragraph id="par_idm1341119296" role="bascode" localize="false" xml-lang="en-US">    iNumber = Freefile</paragraph>
+<paragraph id="par_idm1341118064" role="bascode" localize="false" xml-lang="en-US">    Open aFile For Output As #iNumber</paragraph>
+<paragraph id="par_id3153876" role="bascode" xml-lang="en-US">    Print #iNumber, "This is a line of text"</paragraph>
+<paragraph id="par_idm1341115072" role="bascode" localize="false" xml-lang="en-US">    Close #iNumber</paragraph>
+<paragraph id="par_idm1341113840" role="bascode" localize="false" xml-lang="en-US">    iNumber = Freefile</paragraph>
+<paragraph id="par_idm1341112608" role="bascode" localize="false" xml-lang="en-US">    Open aFile For Input As iNumber</paragraph>
+<paragraph id="par_idm1341111360" role="bascode" localize="false" xml-lang="en-US">    For iCount = 1 To 5</paragraph>
+<paragraph id="par_idm1341110128" role="bascode" localize="false" xml-lang="en-US">        Line Input #iNumber, sLine</paragraph>
+<paragraph id="par_idm1341108880" role="bascode" localize="false" xml-lang="en-US">        If sLine &lt;&gt;"" Then</paragraph>
+<paragraph id="par_idm1341107632" role="bascode" localize="false" xml-lang="en-US">            Rem</paragraph>
+<paragraph id="par_idm1341106400" role="bascode" localize="false" xml-lang="en-US">        End If</paragraph>
+<paragraph id="par_idm1341105168" role="bascode" localize="false" xml-lang="en-US">    Next iCount</paragraph>
+<paragraph id="par_idm1341103936" role="bascode" localize="false" xml-lang="en-US">    Close #iNumber</paragraph>
+<paragraph id="par_idm1341102704" role="bascode" localize="false" xml-lang="en-US">    Exit Sub</paragraph>
 <paragraph id="par_idm1341101472" role="bascode" localize="false" xml-lang="en-US">ErrorHandler:</paragraph>
-<paragraph id="par_idm1341100240" role="bascode" localize="false" xml-lang="en-US"> Reset</paragraph>
-<paragraph id="par_id3146916" role="bascode" xml-lang="en-US"> MsgBox "All files will be closed",0,"Error"</paragraph>
+<paragraph id="par_idm1341100240" role="bascode" localize="false" xml-lang="en-US">    Reset</paragraph>
+<paragraph id="par_id3146916" role="bascode" xml-lang="en-US">    MsgBox "All files will be closed",0,"Error"</paragraph>
 <paragraph id="par_idm1341097264" role="bascode" localize="false" xml-lang="en-US">End Sub</paragraph>
 </bascode>
 </body>