Figure Caption Below - linebreak used not a new paragraph

Follow

Joel Courtney

November 12, 2013 00:56

Scroll Office 3.0.3

Confluence 5.2.4

When exporting using Scroll Office, and selecting Captions to be shown *after* figures, the caption is separated from the previous image (the image it is a caption for) by a line break, not a paragraph.

This is a change of behaviour, and indeed a change of the expected behaviour observed in Microsoft Word (insert caption uses a new paragraph of style "caption").

0

• 

  Nils Bier November 12, 2013 08:17

  Hi Joel,

  thanks for contacting us, this problem is already tracked in our JIRA-system: https://k15t.jira.com/browse/EXP-357

  Please sign up at https://k15t.jira.com/secure/Signup!default.jspa to watch, to comment or to vote for this issue. We'll have a look at the issue and hopefully will have it fixed in the next release of Scroll Office, which is planned to be released at the end of next week.

  I hope this information helps.

  Cheers,
  Nils

  0

  Comment actions Permalink
• 

  Joel Courtney November 15, 2013 03:21

  Hi Nils,

  thanks for that! Just a note, I can only vote or watch an issue - my user in your JIRA instance has no comment capability.

  Thanks heaps for the update!

  Cheers,
  Joel

  PS: the following macro snippet may assist some of your users in the interim. There's obvious issues if line breaks are frequently used, but it'll do the job pretty well (including ensuring that the caption class is applied to the caption paragraphs).

  ' ======================
  ' ScrollOffice Bug Fixes
  ' ======================
  Dim p As Paragraph
  Dim regex_figure, regex_table
  
  Set regex_figure = CreateObject("VBScript.RegExp")
  regex_figure.Pattern = "^Figure \d+\s+"
  
  Set regex_table = CreateObject("VBScript.RegExp")
  regex_table.Pattern = "^Table \d+\s+"
  
  ' First deal with the linebreaks
  MsgBox "Replacing linebreaks. Press OK to continue.", vbMsgBoxSetForeground
  Selection.Find.ClearFormatting
  Selection.Find.Replacement.ClearFormatting
  With Selection.Find
  .Text = "^l"
  .Replacement.Text = "^p"
  End With
  Selection.Find.Execute Replace:=wdReplaceAll
  
  ' Then deal with the
  For Each p In ActiveDocument.Paragraphs
  If p.Range.Style = "Normal" Then
  If regex_figure.test(p.Range.Text) Or regex_table.test(p.Range.Text) Then
  p.Range.Style = "Caption"
  End If
  End If
  Next
  ' ======================

  0

  Comment actions Permalink
• 

  Nils Bier November 15, 2013 10:28

  Hi Joel,

  thanks for the information regarding the comments, we've just updated our JIRA project settings, you should now be able to also comment issues.
  I'll try the suggested workaround and will add it to the issue if it works.

   

  Cheers,
  Nils

  0

  Comment actions Permalink
• 

  Joel Courtney November 17, 2013 22:12

  No worries :)

  0

  Comment actions Permalink

Please sign in to leave a comment.