xXx

Hexid M1n1 5h3ll MobiLe

C:/www/familytree/mods/_[ Writable ]

File:C:/www/familytree/mods/other_spouses_v10.1.3.0.cfg

This is a TNG mod directive file
%name:Other Spouses%
%version:v10.1.3.0%
%description:Shows other spouses%
%description:This mod shows Other Spouses on the person page.<br />Mod developer is <a href="https://tng.community/index.php?/profile/1761-mkoche/" target="_blank">A.S. DuPree</a>.<br />Modified by <a href="https://tng.community/index.php?/profile/9391-brett/" target="_blank">Brett McPhee</a> to install on TNG10.1.3 and above and remove Date of Marriage from hyperlink text.%
%wikipage:Other_Spouses%

%target:getperson.php%

%location:%
		$marrstr = $marrtot > 1 ? " $marrcount" : "";
%end:%
%insert:before%
/* Start other spouses Loc 1*/
        $supfact = '';
        if ($spouserow['personID'] ) {
        $smarriages = getSpouseFamilyFullUnion($tree, $spouserow['personID']);
		$smarrtot = tng_num_rows($smarriages);
		$sspouselink = '';
		}

if ($smarrtot >1) {

while ( $smarriagerow =  tng_fetch_assoc( $smarriages ) )
	{
		if ($smarriagerow['husband'] == $spouserow['personID'] ) $sspouse = $smarriagerow['wife'] ;
		if ($smarriagerow['wife'] == $spouserow['personID'] ) $sspouse = $smarriagerow['husband'] ;
		if( $sspouse ) {
			$sspouseresult = getPersonData($tree, $sspouse);
			$sspouserow =  tng_fetch_assoc( $sspouseresult );
			$ssrights = determineLivingPrivateRights($sspouserow, $righttree);
			$sspouserow['allow_living'] = $ssrights['living'];
			$sspouserow['allow_private'] = $ssrights['private'];
			$smdate = '';
			if ($ssrights) {
			if( $sspouserow['firstname'] || $sspouserow['lastname'] ) {
				if ($smarriagerow['marrdatetr'] AND $smarriagerow['marrdatetr'] != '0000-00-00') $smdate = "(m. " . substr($smarriagerow['marrdatetr'], 0, 4) . ")";
				$sspousename = getName( $sspouserow );
				if ($personID != $sspouserow['personID'] ) {
				$sspouselink .= "<a href=\"$getperson_url" . "personID={$sspouserow['personID']}&amp;tree=$tree\">$sspousename</a>" . " $smdate, ";
				} // marriage date
			} // Spouse name
			} //$ssrights
		} //sspouse
} // $smarrtot
if ($spouserow['firstname']) $intag = strtok(ucwords(strtolower($spouserow['firstname'])), " " ); else $intag = "{$text['spouse']}";
$sptag = $text['otherpartners'];
$sspouselink = rtrim($sspouselink,', ');
	if($srights['both']) 
	    {
		$supfact .= "<br />&nbsp;&nbsp;$sptag$sspouselink&nbsp;";
		}
}
/* End other spouses Loc 1 */
%end:%

%location:%
		$rightfbranch = checkbranch( $marriagerow['branch'] ) ? 1 : 0;
		$marrights = determineLivingPrivateRights($marriagerow, $righttree);
%end:%
%insert:before%
/* Other Spouses Loc 2 */
				if ($supfact) {
						    $pos = strrpos($persontext, "</td></tr>");
							    if($pos !== false)
    							{
    							    $persontext = substr_replace($persontext, "", $pos, strlen("</td></tr>"));
    							}
        					$persontext .= $personpart . $supfact;
				}
/* End Other Spouses Loc 2 */
%end:%

%target:languages/English-UTF8/cust_text.php%

%location:%
<?php
%end:%
%insert:after%
// Begin Added for Other Spouses
$text['otherpartners'] = "Other partners: ";
// End Added for Other Spouses
%end:%

%target:languages/English/cust_text.php%

%location:%
<?php
%end:%
%insert:after%
// Begin Added for Other Spouses
$text['otherpartners'] = "Other partners: ";
// End Added for Other Spouses
%end:%

Your Access Expired	Date. in : 30-10-2025
Regist : 09-12-2024	Expired : 01-12-2027