/usr/lib/ipe/7.1.4/ipelets/search-replace.lua is in ipe 7.1.4-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 | ----------------------------------------------------------------------
-- search-replace ipelet
----------------------------------------------------------------------
--[[
This file is part of the extensible drawing editor Ipe.
Copyright (C) 1993-2013 Otfried Cheong
Ipe is free software; you can redistribute it and/or modify it
under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 3 of the License, or
(at your option) any later version.
As a special exception, you have permission to link Ipe with the
CGAL library and distribute executables, as long as you follow the
requirements of the Gnu General Public License in regard to all of
the software in the executable aside from CGAL.
Ipe is distributed in the hope that it will be useful, but WITHOUT
ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public
License for more details.
You should have received a copy of the GNU General Public License
along with Ipe; if not, you can find it at
"http://www.gnu.org/copyleft/gpl.html", or write to the Free
Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
--]]
label = "Search && replace"
about = [[
Search and replace text in selected text objects.
This ipelet is part of Ipe.
]]
function run(model)
local s = [[Enter pattern and replacement text.
The pattern will be substituted by the replacement text in all
selected text objects.
The substitution does not occur inside groups.]]
local d = ipeui.Dialog(model.ui:win(), "Search & replace")
d:add("label1", "label", {label=s}, 1, 1, 1, 4)
d:add("label2", "label", {label="Pattern"}, 2, 1)
d:add("pattern", "input", {}, 2, 2, 1, 3)
d:add("label3", "label", {label="Replace by"}, 3, 1)
d:add("replace", "input", {}, 3, 2, 1, 3)
d:add("regex", "checkbox", {label="Use Lua patterns"}, 4, 1, 1, 4)
d:addButton("cancel", "&Cancel", "reject")
d:addButton("ok", "&Ok", "accept")
d:setStretch("column", 2, 1)
if not d:execute() then return end
local s1 = d:get("pattern")
local s2 = d:get("replace")
if not d:get("regex") then
-- make strings non-magic
s1 = string.gsub(s1, "(%W)", "%%%1")
s2 = string.gsub(s2, "%%", "%%%%")
end
local t = { label = label,
pno = model.pno,
vno = model.vno,
original = model:page():clone(),
final = model:page():clone(),
undo = _G.revertOriginal,
redo = _G.revertFinal,
}
for i,obj,sel,layer in t.final:objects() do
if sel and obj:type() == "text" then
local text = obj:text()
text = text:gsub(s1, s2)
obj:setText(text)
end
end
model:register(t)
end
----------------------------------------------------------------------
|