Hi!
henrik wilming (henrik at lysithea.sunn.de) wrote:
> Is there any way to do German quotation marks in scribus without having
> to paste them out of the character table?
See the attached Python script :)
(currently with French quotation characters)
Henning
-------------- next part --------------
#!/usr/bin/python
# -*- coding: ISO-8859-1 -*-
# DO NOT remove above line
from scribus import *
import os, re
QUOTE_START = "?"
QUOTE_END = "?"
def msgBox(msg):
# replace with "gdialog" or "xterm -e dialog" if needed
# it would be nice, if the plugin would provide a msgbox
# and a file selector
cmd = 'kdialog --msgbox "%s"'
os.system(cmd % msg)
def quote(textobj):
quoted_re = re.compile('"[^"]*"')
text = GetText(textobj)
count = 0
i = 0
SelectText(0, 0, textobj)
while i < len(text):
match = quoted_re.match(text[i:])
if match:
end = match.end()
SelectText(i, 1, textobj)
DeleteText(textobj)
InsertText(QUOTE_START, i, textobj)
SelectText(i + end - 1, 1, textobj)
DeleteText(textobj)
InsertText(QUOTE_END, i + end - 1, textobj)
count += 1
i = i + end
else:
i = i + 1
return count
if HaveDoc():
changed = 0
sel_count = SelectionCount()
SetRedraw(0)
if sel_count:
for i in range(sel_count):
changed += quote(GetSelectedObject(i))
else:
for page in range(PageCount()):
GotoPage(page)
for obj in GetAllObjects():
changed += quote(obj)
SetRedraw(1)
msgBox("%s quotations changed" % changed)
else:
msgBox("No document open")
