/usr/share/lifelines/getbaptism.li is in lifelines-reports 3.0.61-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 | /*
* @progname getbaptism.li
* @version none
* @author anon
* @category
* @output gedcom node function value
* @description
*
* getbaptism(ind) -> NODE
* The built-in baptism() function is limited to "CHR" records.
* Many programs use the "BAPM" and LDS uses "BAPL" so this version
* looks for all three in the order "CHR", "BAPM", "BAPL".
*
*/
func getbaptism(ind)
{
if (e, baptism(ind)) { return (e) }
fornodes(root(ind), node) {
set(t, tag(node))
if (eqstr(t, "BAPM")) { return (node) }
if (eqstr(t, "BAPL")) { return (node) }
}
return (0)
}
|