$controller->setPageTitle($person->getFullName() . ' - ' . I18N::translate('Add a wife using an existing individual')); } $controller->pageHeader(); if ($person->getSex() === 'M') { $gedcom = "0 @new@ FAM\n1 HUSB @" . $person->getXref() . "@\n1 WIFE @" . $spouse->getXref() . '@'; } else { $gedcom = "0 @new@ FAM\n1 HUSB @" . $spouse->getXref() . "@\n1 WIFE @" . $person->getXref() . '@'; } FunctionsEdit::splitSource(); $gedcom .= FunctionsEdit::addNewFact('MARR'); if (Filter::postBool('SOUR_FAM') || count($tagSOUR) > 0) { // before adding 2 SOUR it needs to add 1 MARR Y first if (FunctionsEdit::addNewFact('MARR') === '') { $gedcom .= "\n1 MARR Y"; } $gedcom = FunctionsEdit::handleUpdates($gedcom); } else { // before adding level 2 facts it needs to add 1 MARR Y first if (FunctionsEdit::addNewFact('MARR') === '') { $gedcom .= "\n1 MARR Y"; } $gedcom = FunctionsEdit::updateRest($gedcom); } $family = $person->getTree()->createRecord($gedcom); $person->createFact('1 FAMS @' . $family->getXref() . '@', true); $spouse->createFact('1 FAMS @' . $family->getXref() . '@', true); $controller->addInlineJavascript('closePopupAndReloadParent();'); break; //////////////////////////////////////////////////////////////////////////////// // Create a new source record ////////////////////////////////////////////////////////////////////////////////
$messages = true; } if (!file_exists($newServerThumb)) { FlashMessages::addMessage(I18N::translate('The thumbnail file %s does not exist.', Html::filename($newFilename))); $messages = true; } } } // Insert the 1 FILE xxx record into the arrays used by function FunctionsEdit::handle_updatesges() $glevels = array_merge(array('1'), $glevels); $tag = array_merge(array('FILE'), $tag); $islink = array_merge(array(0), $islink); $text = array_merge(array($newFilename), $text); $record = GedcomRecord::getInstance($pid, $WT_TREE); $newrec = "0 @{$pid}@ OBJE\n"; $newrec = FunctionsEdit::handleUpdates($newrec); $record->updateRecord($newrec, $update_CHAN); if ($move_file) { // We've moved a file. Therefore we must approve the change, as rejecting // the change will create broken references. FunctionsImport::acceptAllChanges($record->getXref(), $record->getTree()->getTreeId()); } if ($pid && $linktoid) { $record = GedcomRecord::getInstance($linktoid, $WT_TREE); $record->createFact('1 OBJE @' . $pid . '@', true); Log::addEditLog('Media ID ' . $pid . " successfully added to {$linktoid}."); } $controller->pageHeader(); if ($messages) { echo '<button onclick="closePopupAndReloadParent();">', I18N::translate('close'), '</button>'; } else {