Ejemplo n.º 1
0
 function addClipping(WT_GedcomRecord $record)
 {
     global $WT_SESSION;
     if ($record->canShowName()) {
         $WT_SESSION->cart[WT_GED_ID][$record->getXref()] = true;
         // Add directly linked records
         preg_match_all('/\\n\\d (?:OBJE|NOTE|SOUR|REPO) @(' . WT_REGEX_XREF . ')@/', $record->getGedcom(), $matches);
         foreach ($matches[1] as $match) {
             $WT_SESSION->cart[WT_GED_ID][$match] = true;
         }
     }
 }