Behind The Name forenames.fh_lua--[[
@Title: Behind The Name forenames
@Author: Jane Taubman
@Version: 2.0
@LastUpdated: Feb 2023
@Description:
Launches the Behind the Name Web site for the currently selected Given Names
Useful for checking unusual names for likely sex and origin.
Behind the Name is a website for learning about all aspects of given names.
2.0 Remove internal web browser and use users default one.
]]
function main()
local linktemplate = 'https://www.behindthename.com/php/search.php?terms={n}'
local plist = fhGetCurrentRecordSel('INDI')
if #plist == 0 then
plist = fhPromptUserForRecordSel('INDI',1)
end
if plist[1] == nil then
return
end
local strGivenNames = fhGetItemText(plist[1],'~.NAME:GIVEN_ALL')
-- Open a window for each Given Name
local tc = 0
for name in string.gmatch(strGivenNames, "%a+") do
if #name > 2 then
fhShellExecute(linktemplate:gsub('{n}',name))
end
end
end
main()
--[[
@Title: Behind The Name forenames
@Author: Jane Taubman
@Version: 2.0
@LastUpdated: Feb 2023
@Description:
Launches the Behind the Name Web site for the currently selected Given Names
Useful for checking unusual names for likely sex and origin.
Behind the Name is a website for learning about all aspects of given names.
2.0 Remove internal web browser and use users default one.
]]
function main()
local linktemplate = 'https://www.behindthename.com/php/search.php?terms={n}'
local plist = fhGetCurrentRecordSel('INDI')
if #plist == 0 then
plist = fhPromptUserForRecordSel('INDI',1)
end
if plist[1] == nil then
return
end
local strGivenNames = fhGetItemText(plist[1],'~.NAME:GIVEN_ALL')
-- Open a window for each Given Name
local tc = 0
for name in string.gmatch(strGivenNames, "%a+") do
if #name > 2 then
fhShellExecute(linktemplate:gsub('{n}',name))
end
end
end
main()Source:Behind-The-Name-forenames-1.fh_lua