fisharebest / webtrees

app/Census/CensusOfWales1841.php

Indentation +23 added lines, -23 removed lines

@@ -19,28 +19,28 @@
  * Definitions for a census
  */
 class CensusOfWales1841 extends CensusOfWales implements CensusInterface {
-	/**
-	 * When did this census occur.
-	 *
-	 * @return string
-	 */
-	public function censusDate() {
-		return '06 JUN 1841';
-	}
+    /**
+     * When did this census occur.
+     *
+     * @return string
+     */
+    public function censusDate() {
+        return '06 JUN 1841';
+    }
 
-	/**
-	 * The columns of the census.
-	 *
-	 * @return CensusColumnInterface[]
-	 */
-	public function columns() {
-		return array(
-			new CensusColumnFullName($this, 'Name', 'Name'),
-			new CensusColumnAgeMale5Years($this, 'AgeM', 'Age (males)'),
-			new CensusColumnAgeFemale5Years($this, 'AgeF', 'Age (females)'),
-			new CensusColumnOccupation($this, 'Occupation', 'Profession, trade, employment or of independent means'),
-			new CensusColumnNull($this, 'BiC', 'Born in same county'),
-			new CensusColumnBornForeignParts($this, 'SIF', 'Born in Scotland, Ireland or foreign parts'),
-		);
-	}
+    /**
+     * The columns of the census.
+     *
+     * @return CensusColumnInterface[]
+     */
+    public function columns() {
+        return array(
+            new CensusColumnFullName($this, 'Name', 'Name'),
+            new CensusColumnAgeMale5Years($this, 'AgeM', 'Age (males)'),
+            new CensusColumnAgeFemale5Years($this, 'AgeF', 'Age (females)'),
+            new CensusColumnOccupation($this, 'Occupation', 'Profession, trade, employment or of independent means'),
+            new CensusColumnNull($this, 'BiC', 'Born in same county'),
+            new CensusColumnBornForeignParts($this, 'SIF', 'Born in Scotland, Ireland or foreign parts'),
+        );
+    }
 }

Braces +6 added lines, -3 removed lines

@@ -18,13 +18,15 @@ 
 /**
  * Definitions for a census
  */
-class CensusOfWales1841 extends CensusOfWales implements CensusInterface {
+class CensusOfWales1841 extends CensusOfWales implements CensusInterface
+{
 	/**
 	 * When did this census occur.
 	 *
 	 * @return string
 	 */
-	public function censusDate() {
+	public function censusDate()
+	{
 		return '06 JUN 1841';
 	}
 
@@ -33,7 +35,8 @@ 
 	 *
 	 * @return CensusColumnInterface[]
 	 */
-	public function columns() {
+	public function columns()
+	{
 		return array(
 			new CensusColumnFullName($this, 'Name', 'Name'),
 			new CensusColumnAgeMale5Years($this, 'AgeM', 'Age (males)'),

app/Census/CensusOfFrance1881.php

Indentation +22 added lines, -22 removed lines

@@ -19,27 +19,27 @@
  * Definitions for a census
  */
 class CensusOfFrance1881 extends CensusOfFrance implements CensusInterface {
-	/**
-	 * When did this census occur.
-	 *
-	 * @return string
-	 */
-	public function censusDate() {
-		return '20 JAN 1881';
-	}
+    /**
+     * When did this census occur.
+     *
+     * @return string
+     */
+    public function censusDate() {
+        return '20 JAN 1881';
+    }
 
-	/**
-	 * The columns of the census.
-	 *
-	 * @return CensusColumnInterface[]
-	 */
-	public function columns() {
-		return array(
-			new CensusColumnSurname($this, 'Noms', 'Noms de famille'),
-			new CensusColumnGivenNames($this, 'Prénoms', ''),
-			new CensusColumnAge($this, 'Âge', ''),
-			new CensusColumnOccupation($this, 'Profession', ''),
-			new CensusColumnRelationToHead($this, 'Position', 'Position dans le ménage'),
-		);
-	}
+    /**
+     * The columns of the census.
+     *
+     * @return CensusColumnInterface[]
+     */
+    public function columns() {
+        return array(
+            new CensusColumnSurname($this, 'Noms', 'Noms de famille'),
+            new CensusColumnGivenNames($this, 'Prénoms', ''),
+            new CensusColumnAge($this, 'Âge', ''),
+            new CensusColumnOccupation($this, 'Profession', ''),
+            new CensusColumnRelationToHead($this, 'Position', 'Position dans le ménage'),
+        );
+    }
 }

Braces +6 added lines, -3 removed lines

@@ -18,13 +18,15 @@ 
 /**
  * Definitions for a census
  */
-class CensusOfFrance1881 extends CensusOfFrance implements CensusInterface {
+class CensusOfFrance1881 extends CensusOfFrance implements CensusInterface
+{
 	/**
 	 * When did this census occur.
 	 *
 	 * @return string
 	 */
-	public function censusDate() {
+	public function censusDate()
+	{
 		return '20 JAN 1881';
 	}
 
@@ -33,7 +35,8 @@ 
 	 *
 	 * @return CensusColumnInterface[]
 	 */
-	public function columns() {
+	public function columns()
+	{
 		return array(
 			new CensusColumnSurname($this, 'Noms', 'Noms de famille'),
 			new CensusColumnGivenNames($this, 'Prénoms', ''),

app/Census/CensusColumnConditionFrenchFille.php

Indentation +15 added lines, -15 removed lines

@@ -19,23 +19,23 @@
  * Marital status.
  */
 class CensusColumnConditionFrenchFille extends AbstractCensusColumnCondition {
-	/* Text to display for married individuals */
-	protected $husband = '';
-	protected $wife    = '';
+    /* Text to display for married individuals */
+    protected $husband = '';
+    protected $wife    = '';
 
-	/* Text to display for unmarried individuals */
-	protected $bachelor = '';
-	protected $spinster = '1';
+    /* Text to display for unmarried individuals */
+    protected $bachelor = '';
+    protected $spinster = '1';
 
-	/* Text to display for children */
-	protected $boy  = '';
-	protected $girl = '1';
+    /* Text to display for children */
+    protected $boy  = '';
+    protected $girl = '1';
 
-	/* Text to display for divorced individuals */
-	protected $divorce  = '';
-	protected $divorcee = '';
+    /* Text to display for divorced individuals */
+    protected $divorce  = '';
+    protected $divorcee = '';
 
-	/* Text to display for widowed individuals (not yet implemented) */
-	protected $widower = '';
-	protected $widow   = '';
+    /* Text to display for widowed individuals (not yet implemented) */
+    protected $widower = '';
+    protected $widow   = '';
 }

Braces +2 added lines, -1 removed lines

@@ -18,7 +18,8 @@
 /**
  * Marital status.
  */
-class CensusColumnConditionFrenchFille extends AbstractCensusColumnCondition {
+class CensusColumnConditionFrenchFille extends AbstractCensusColumnCondition
+{
 	/* Text to display for married individuals */
 	protected $husband = '';
 	protected $wife    = '';

app/Statement.php

Indentation +201 added lines, -201 removed lines

@@ -22,205 +22,205 @@
  * Extend PHP's native PDOStatement class.
  */
 class Statement {
-	/** @var PDOStatement A prepared statement. */
-	private $pdo_statement;
-
-	/** @var bool Keep track of calls to execute(), so we can do it automatically. */
-	private $executed = false;
-
-	/**
-	 * Create a Statement object from a PDOStatement object.
-	 *
-	 * @param PDOStatement $pdo_statement
-	 */
-	public function __construct(PDOStatement $pdo_statement) {
-		$this->pdo_statement = $pdo_statement;
-	}
-
-	/**
-	 * Execute a query
-	 *
-	 * @param array $bind_variables
-	 *
-	 * @throws \Exception
-	 *
-	 * @return Statement
-	 */
-	public function execute($bind_variables = array()) {
-		if ($this->executed) {
-			throw new \Exception('Statement::execute() called twice.');
-		}
-
-		// Parameters may be either named (e.g. :foo) or positional (e.g. ?).
-		// Named parameters may take any type. Positional parameters are always strings.
-		// Queries should use one format or the other.
-		foreach ($bind_variables as $key => $bind_variable) {
-			if (is_numeric($key)) {
-				// Positional parameters are numeric (starting at 1)
-				$key = 1 + $key;
-			} else {
-				// Named parameters are prefixed with a colon
-				$key = ':' . $key;
-			}
-			switch (gettype($bind_variable)) {
-			case 'NULL':
-				$this->pdo_statement->bindValue($key, $bind_variable, PDO::PARAM_NULL);
-				break;
-			case 'boolean':
-				$this->pdo_statement->bindValue($key, (int) $bind_variable, PDO::PARAM_INT);
-				break;
-			case 'integer':
-				$this->pdo_statement->bindValue($key, $bind_variable, PDO::PARAM_INT);
-				break;
-			default:
-				$this->pdo_statement->bindValue($key, $bind_variable, PDO::PARAM_STR);
-				break;
-			}
-		}
-
-		$start = microtime(true);
-		$this->pdo_statement->execute();
-		$end = microtime(true);
-		// If it was a SELECT statement, we cannot run it again.
-		$this->executed = strpos($this->pdo_statement->queryString, 'SELECT') === 0;
-
-		Database::logQuery($this->pdo_statement->queryString, $this->pdo_statement->rowCount(), $end - $start, $bind_variables);
-
-		return $this;
-	}
-
-	/**
-	 * Close the cursor, and mark it as not-executed, so we can execute
-	 * it again (perhaps with different parameters).
-	 */
-	public function closeCursor() {
-		$this->pdo_statement->closeCursor();
-		$this->executed = false;
-	}
-
-	/**
-	 * Fetch the next row from the cursor.
-	 *
-	 * Execute the query, if necessary. Typically when there are no parameters.
-	 *
-	 * @param int $fetch_style
-	 *
-	 * @return \stdClass|array|false
-	 */
-	public function fetch($fetch_style = PDO::FETCH_OBJ) {
-		if (!$this->executed) {
-			$this->execute();
-		}
-
-		return $this->pdo_statement->fetch($fetch_style);
-	}
-
-	/**
-	 * Fetch all rows from the cursor, and close it.
-	 *
-	 * Execute the query, if necessary. Typically when there are no parameters.
-	 *
-	 * @param int $fetch_style
-	 *
-	 * @return \stdClass[]|string[][]
-	 */
-	public function fetchAll($fetch_style = PDO::FETCH_OBJ) {
-		if (!$this->executed) {
-			$this->execute();
-		}
-
-		$rows = $this->pdo_statement->fetchAll($fetch_style);
-		$this->closeCursor();
-
-		return $rows;
-	}
-
-	/**
-	 * Fetch one row, and close the cursor. e.g. SELECT * FROM foo WHERE pk=bar
-	 *
-	 * Execute the query, if necessary. Typically when there are no parameters.
-	 *
-	 * @param int $fetch_style
-	 *
-	 * @return \stdClass|array|null
-	 */
-	public function fetchOneRow($fetch_style = PDO::FETCH_OBJ) {
-		if (!$this->executed) {
-			$this->execute();
-		}
-
-		$row = $this->pdo_statement->fetch($fetch_style);
-		$this->closeCursor();
-
-		return $row === false ? null : $row;
-	}
-
-	/**
-	 * Fetch one value and close the cursor. e.g. SELECT MAX(foo) FROM bar
-	 *
-	 * Execute the query, if necessary. Typically when there are no parameters.
-	 *
-	 * @return string|null
-	 */
-	public function fetchOne() {
-		if (!$this->executed) {
-			$this->execute();
-		}
-
-		$value = $this->pdo_statement->fetchColumn();
-		$this->closeCursor();
-
-		return $value === false ? null : $value;
-	}
-
-	/**
-	 * Fetch two columns, and return an associative array of col1=>col2
-	 *
-	 * Execute the query, if necessary. Typically when there are no parameters.
-	 *
-	 * @return string[]
-	 */
-	public function fetchAssoc() {
-		if (!$this->executed) {
-			$this->execute();
-		}
-
-		$rows = array();
-		while ($row = $this->pdo_statement->fetch(PDO::FETCH_NUM)) {
-			$rows[$row[0]] = $row[1];
-		}
-		$this->closeCursor();
-
-		return $rows;
-	}
-
-	/**
-	 * Fetch all the first column, as an array.
-	 *
-	 * Execute the query, if necessary. Typically when there are no parameters.
-	 *
-	 * @return string[]
-	 */
-	public function fetchOneColumn() {
-		if (!$this->executed) {
-			$this->execute();
-		}
-
-		$list = array();
-		while ($row = $this->pdo_statement->fetch(PDO::FETCH_NUM)) {
-			$list[] = $row[0];
-		}
-		$this->closeCursor();
-
-		return $list;
-	}
-
-	/**
-	 * How many rows were affected by this statement.
-	 *
-	 * @return int
-	 */
-	public function rowCount() {
-		return $this->pdo_statement->rowCount();
-	}
+    /** @var PDOStatement A prepared statement. */
+    private $pdo_statement;
+
+    /** @var bool Keep track of calls to execute(), so we can do it automatically. */
+    private $executed = false;
+
+    /**
+     * Create a Statement object from a PDOStatement object.
+     *
+     * @param PDOStatement $pdo_statement
+     */
+    public function __construct(PDOStatement $pdo_statement) {
+        $this->pdo_statement = $pdo_statement;
+    }
+
+    /**
+     * Execute a query
+     *
+     * @param array $bind_variables
+     *
+     * @throws \Exception
+     *
+     * @return Statement
+     */
+    public function execute($bind_variables = array()) {
+        if ($this->executed) {
+            throw new \Exception('Statement::execute() called twice.');
+        }
+
+        // Parameters may be either named (e.g. :foo) or positional (e.g. ?).
+        // Named parameters may take any type. Positional parameters are always strings.
+        // Queries should use one format or the other.
+        foreach ($bind_variables as $key => $bind_variable) {
+            if (is_numeric($key)) {
+                // Positional parameters are numeric (starting at 1)
+                $key = 1 + $key;
+            } else {
+                // Named parameters are prefixed with a colon
+                $key = ':' . $key;
+            }
+            switch (gettype($bind_variable)) {
+            case 'NULL':
+                $this->pdo_statement->bindValue($key, $bind_variable, PDO::PARAM_NULL);
+                break;
+            case 'boolean':
+                $this->pdo_statement->bindValue($key, (int) $bind_variable, PDO::PARAM_INT);
+                break;
+            case 'integer':
+                $this->pdo_statement->bindValue($key, $bind_variable, PDO::PARAM_INT);
+                break;
+            default:
+                $this->pdo_statement->bindValue($key, $bind_variable, PDO::PARAM_STR);
+                break;
+            }
+        }
+
+        $start = microtime(true);
+        $this->pdo_statement->execute();
+        $end = microtime(true);
+        // If it was a SELECT statement, we cannot run it again.
+        $this->executed = strpos($this->pdo_statement->queryString, 'SELECT') === 0;
+
+        Database::logQuery($this->pdo_statement->queryString, $this->pdo_statement->rowCount(), $end - $start, $bind_variables);
+
+        return $this;
+    }
+
+    /**
+     * Close the cursor, and mark it as not-executed, so we can execute
+     * it again (perhaps with different parameters).
+     */
+    public function closeCursor() {
+        $this->pdo_statement->closeCursor();
+        $this->executed = false;
+    }
+
+    /**
+     * Fetch the next row from the cursor.
+     *
+     * Execute the query, if necessary. Typically when there are no parameters.
+     *
+     * @param int $fetch_style
+     *
+     * @return \stdClass|array|false
+     */
+    public function fetch($fetch_style = PDO::FETCH_OBJ) {
+        if (!$this->executed) {
+            $this->execute();
+        }
+
+        return $this->pdo_statement->fetch($fetch_style);
+    }
+
+    /**
+     * Fetch all rows from the cursor, and close it.
+     *
+     * Execute the query, if necessary. Typically when there are no parameters.
+     *
+     * @param int $fetch_style
+     *
+     * @return \stdClass[]|string[][]
+     */
+    public function fetchAll($fetch_style = PDO::FETCH_OBJ) {
+        if (!$this->executed) {
+            $this->execute();
+        }
+
+        $rows = $this->pdo_statement->fetchAll($fetch_style);
+        $this->closeCursor();
+
+        return $rows;
+    }
+
+    /**
+     * Fetch one row, and close the cursor. e.g. SELECT * FROM foo WHERE pk=bar
+     *
+     * Execute the query, if necessary. Typically when there are no parameters.
+     *
+     * @param int $fetch_style
+     *
+     * @return \stdClass|array|null
+     */
+    public function fetchOneRow($fetch_style = PDO::FETCH_OBJ) {
+        if (!$this->executed) {
+            $this->execute();
+        }
+
+        $row = $this->pdo_statement->fetch($fetch_style);
+        $this->closeCursor();
+
+        return $row === false ? null : $row;
+    }
+
+    /**
+     * Fetch one value and close the cursor. e.g. SELECT MAX(foo) FROM bar
+     *
+     * Execute the query, if necessary. Typically when there are no parameters.
+     *
+     * @return string|null
+     */
+    public function fetchOne() {
+        if (!$this->executed) {
+            $this->execute();
+        }
+
+        $value = $this->pdo_statement->fetchColumn();
+        $this->closeCursor();
+
+        return $value === false ? null : $value;
+    }
+
+    /**
+     * Fetch two columns, and return an associative array of col1=>col2
+     *
+     * Execute the query, if necessary. Typically when there are no parameters.
+     *
+     * @return string[]
+     */
+    public function fetchAssoc() {
+        if (!$this->executed) {
+            $this->execute();
+        }
+
+        $rows = array();
+        while ($row = $this->pdo_statement->fetch(PDO::FETCH_NUM)) {
+            $rows[$row[0]] = $row[1];
+        }
+        $this->closeCursor();
+
+        return $rows;
+    }
+
+    /**
+     * Fetch all the first column, as an array.
+     *
+     * Execute the query, if necessary. Typically when there are no parameters.
+     *
+     * @return string[]
+     */
+    public function fetchOneColumn() {
+        if (!$this->executed) {
+            $this->execute();
+        }
+
+        $list = array();
+        while ($row = $this->pdo_statement->fetch(PDO::FETCH_NUM)) {
+            $list[] = $row[0];
+        }
+        $this->closeCursor();
+
+        return $list;
+    }
+
+    /**
+     * How many rows were affected by this statement.
+     *
+     * @return int
+     */
+    public function rowCount() {
+        return $this->pdo_statement->rowCount();
+    }
 }

Switch Indentation +12 added lines, -12 removed lines

@@ -63,18 +63,18 @@
 				$key = ':' . $key;
 			}
 			switch (gettype($bind_variable)) {
-			case 'NULL':
-				$this->pdo_statement->bindValue($key, $bind_variable, PDO::PARAM_NULL);
-				break;
-			case 'boolean':
-				$this->pdo_statement->bindValue($key, (int) $bind_variable, PDO::PARAM_INT);
-				break;
-			case 'integer':
-				$this->pdo_statement->bindValue($key, $bind_variable, PDO::PARAM_INT);
-				break;
-			default:
-				$this->pdo_statement->bindValue($key, $bind_variable, PDO::PARAM_STR);
-				break;
+			    case 'NULL':
+				    $this->pdo_statement->bindValue($key, $bind_variable, PDO::PARAM_NULL);
+				    break;
+			    case 'boolean':
+				    $this->pdo_statement->bindValue($key, (int) $bind_variable, PDO::PARAM_INT);
+				    break;
+			    case 'integer':
+				    $this->pdo_statement->bindValue($key, $bind_variable, PDO::PARAM_INT);
+				    break;
+			    default:
+				    $this->pdo_statement->bindValue($key, $bind_variable, PDO::PARAM_STR);
+				    break;
 			}
 		}
 

Braces +22 added lines, -11 removed lines

@@ -21,7 +21,8 @@ 
 /**
  * Extend PHP's native PDOStatement class.
  */
-class Statement {
+class Statement
+{
 	/** @var PDOStatement A prepared statement. */
 	private $pdo_statement;
 
@@ -33,7 +34,8 @@ 
 	 *
 	 * @param PDOStatement $pdo_statement
 	 */
-	public function __construct(PDOStatement $pdo_statement) {
+	public function __construct(PDOStatement $pdo_statement)
+	{
 		$this->pdo_statement = $pdo_statement;
 	}
 
@@ -46,7 +48,8 @@ 
 	 *
 	 * @return Statement
 	 */
-	public function execute($bind_variables = array()) {
+	public function execute($bind_variables = array())
+	{
 		if ($this->executed) {
 			throw new \Exception('Statement::execute() called twice.');
 		}
@@ -93,7 +96,8 @@ 
 	 * Close the cursor, and mark it as not-executed, so we can execute
 	 * it again (perhaps with different parameters).
 	 */
-	public function closeCursor() {
+	public function closeCursor()
+	{
 		$this->pdo_statement->closeCursor();
 		$this->executed = false;
 	}
@@ -107,7 +111,8 @@ 
 	 *
 	 * @return \stdClass|array|false
 	 */
-	public function fetch($fetch_style = PDO::FETCH_OBJ) {
+	public function fetch($fetch_style = PDO::FETCH_OBJ)
+	{
 		if (!$this->executed) {
 			$this->execute();
 		}
@@ -124,7 +129,8 @@ 
 	 *
 	 * @return \stdClass[]|string[][]
 	 */
-	public function fetchAll($fetch_style = PDO::FETCH_OBJ) {
+	public function fetchAll($fetch_style = PDO::FETCH_OBJ)
+	{
 		if (!$this->executed) {
 			$this->execute();
 		}
@@ -144,7 +150,8 @@ 
 	 *
 	 * @return \stdClass|array|null
 	 */
-	public function fetchOneRow($fetch_style = PDO::FETCH_OBJ) {
+	public function fetchOneRow($fetch_style = PDO::FETCH_OBJ)
+	{
 		if (!$this->executed) {
 			$this->execute();
 		}
@@ -162,7 +169,8 @@ 
 	 *
 	 * @return string|null
 	 */
-	public function fetchOne() {
+	public function fetchOne()
+	{
 		if (!$this->executed) {
 			$this->execute();
 		}
@@ -180,7 +188,8 @@ 
 	 *
 	 * @return string[]
 	 */
-	public function fetchAssoc() {
+	public function fetchAssoc()
+	{
 		if (!$this->executed) {
 			$this->execute();
 		}
@@ -201,7 +210,8 @@ 
 	 *
 	 * @return string[]
 	 */
-	public function fetchOneColumn() {
+	public function fetchOneColumn()
+	{
 		if (!$this->executed) {
 			$this->execute();
 		}
@@ -220,7 +230,8 @@ 
 	 *
 	 * @return int
 	 */
-	public function rowCount() {
+	public function rowCount()
+	{
 		return $this->pdo_statement->rowCount();
 	}
 }

app/Menu.php

Indentation +277 added lines, -277 removed lines

@@ -21,281 +21,281 @@
  * System for generating menus.
  */
 class Menu {
-	/** @var string The text to be displayed in the mneu */
-	private $label;
-
-	/** @var string The target URL or href*/
-	private $link;
-
-	/** @var string The CSS class used to style this menu item */
-	private $class;
-
-	/** @var string[] A list of optional HTML attributes, such as onclick or data-xxx */
-	private $attrs;
-
-	/** @var Menu[] An optional list of sub-menus. */
-	private $submenus;
-
-	/** @var string Used internally to create javascript menus */
-	private $parentmenu;
-
-	/** @var string Used to format javascript menus */
-	private $submenuclass;
-
-	/** @var string Used to format javascript menus */
-	private $menuclass;
-
-	/**
-	 * Constructor for the menu class
-	 *
-	 * @param string   $label    The label for the menu item
-	 * @param string   $link     The target URL
-	 * @param string   $class    A CSS class
-	 * @param string[] $attrs    Optional attributes, such as onclick or data-xxx
-	 * @param Menu[]   $submenus Any submenus
-	 */
-	public function __construct($label, $link = '#', $class = '', array $attrs = array(), array $submenus = array()) {
-		$this
-			->setLabel($label)
-			->setLink($link)
-			->setClass($class)
-			->setAttrs($attrs)
-			->setSubmenus($submenus);
-	}
-
-	/**
-	 * Convert this menu to an HTML list, for easy rendering of
-	 * lists of menus/nulls.
-	 *
-	 * @return string
-	 */
-	public function __toString() {
-		return $this->getMenuAsList();
-	}
-
-	/**
-	 * Render this menu using Bootstrap markup
-	 *
-	 * @return string
-	 */
-	public function bootstrap() {
-		if ($this->submenus) {
-			$submenus = '';
-			foreach ($this->submenus as $submenu) {
-				$submenus .= $submenu->bootstrap();
-			}
-
-			return
-				'<li class="' . $this->class . ' dropdown">' .
-				'<a href="#" class="dropdown-toggle" data-toggle="dropdown" role="button" aria-expanded="false">' .
-				$this->label .
-				' <span class="caret"></span></a>' .
-				'<ul class="dropdown-menu" role="menu">' .
-				$submenus .
-				'</ul>' .
-				'</li>';
-		} else {
-			$attrs = '';
-			foreach ($this->attrs as $key => $value) {
-				$attrs .= ' ' . $key . '="' . Filter::escapeHtml($value) . '"';
-			}
-
-			return '<li class="' . $this->class . '"><a href="' . $this->link . '"' . $attrs . '>' . $this->label . '</a></li>';
-		}
-	}
-
-	/**
-	 * Get the optional attributes.
-	 *
-	 * @return string[]
-	 */
-	public function getAttrs() {
-		return $this->attrs;
-	}
-
-	/**
-	 * Set the optional attributes.
-	 *
-	 * @param string[] $attrs
-	 *
-	 * @return $this
-	 */
-	public function setAttrs(array $attrs) {
-		$this->attrs = $attrs;
-
-		return $this;
-	}
-
-	/**
-	 * Set the CSS classes for the (legacy) javascript menus
-	 *
-	 * @param string $menuclass
-	 * @param string $submenuclass
-	 */
-	public function addClass($menuclass, $submenuclass = '') {
-		$this->menuclass    = $menuclass;
-		$this->submenuclass = $submenuclass;
-	}
-
-	/**
-	 * Get the class.
-	 *
-	 * @return string
-	 */
-	public function getClass() {
-		return $this->class;
-	}
-
-	/**
-	 * Set the class.
-	 *
-	 * @param string $class
-	 *
-	 * @return $this
-	 */
-	public function setClass($class) {
-		$this->class = $class;
-
-		return $this;
-	}
-
-	/**
-	 * Get the label.
-	 *
-	 * @return string
-	 */
-	public function getLabel() {
-		return $this->label;
-	}
-
-	/**
-	 * Set the label.
-	 *
-	 * @param string $label
-	 *
-	 * @return $this
-	 */
-	public function setLabel($label) {
-		$this->label = $label;
-
-		return $this;
-	}
-
-	/**
-	 * Get the link.
-	 *
-	 * @return string
-	 */
-	public function getLink() {
-		return $this->link;
-	}
-
-	/**
-	 * Set the link.
-	 *
-	 * @param string $link
-	 *
-	 * @return $this
-	 */
-	public function setLink($link) {
-		$this->link = $link;
-
-		return $this;
-	}
-
-	/**
-	 * Add a submenu to this menu
-	 *
-	 * @param Menu $menu
-	 *
-	 * @return $this
-	 */
-	public function addSubmenu($menu) {
-		$this->submenus[] = $menu;
-
-		return $this;
-	}
-
-	/**
-	 * Render this menu using javascript popups..
-	 *
-	 * @return string
-	 */
-	public function getMenu() {
-		$menu_id     = 'menu-' . Uuid::uuid4();
-		$sub_menu_id = 'sub-' . $menu_id;
-
-		$html = '<a href="' . $this->link . '"';
-		foreach ($this->attrs as $key => $value) {
-			$html .= ' ' . $key . '="' . Filter::escapeHtml($value) . '"';
-		}
-		if (!empty($this->submenus)) {
-			$html .= ' onmouseover="show_submenu(\'' . $sub_menu_id . '\', \'' . $menu_id . '\');"';
-			$html .= ' onmouseout="timeout_submenu(\'' . $sub_menu_id . '\');"';
-		}
-		$html .= '>' . $this->label . '</a>';
-
-		if (!empty($this->submenus)) {
-			$html .= '<div id="' . $sub_menu_id . '" class="' . $this->submenuclass . '"';
-			$html .= ' style="position: absolute; visibility: hidden; z-index: 100; text-align: ' . (I18N::direction() === 'ltr' ? 'left' : 'right') . '"';
-			$html .= ' onmouseover="show_submenu(\'' . $this->parentmenu . '\'); show_submenu(\'' . $sub_menu_id . '\');"';
-			$html .= ' onmouseout="timeout_submenu(\'' . $sub_menu_id . '\');">';
-			foreach ($this->submenus as $submenu) {
-				$submenu->parentmenu = $sub_menu_id;
-				$html .= $submenu->getMenu();
-			}
-			$html .= '</div>';
-		}
-
-		return '<div id="' . $menu_id . '" class="' . $this->menuclass . '">' . $html . '</div>';
-	}
-
-	/**
-	 * Render this menu as an HTML list
-	 *
-	 * @return string
-	 */
-	public function getMenuAsList() {
-		$attrs = '';
-		foreach ($this->attrs as $key => $value) {
-			$attrs .= ' ' . $key . '="' . Filter::escapeHtml($value) . '"';
-		}
-		if ($this->link) {
-			$link = ' href="' . $this->link . '"';
-		} else {
-			$link = '';
-		}
-		$html = '<a' . $link . $attrs . '>' . $this->label . '</a>';
-		if ($this->submenus) {
-			$html .= '<ul>';
-			foreach ($this->submenus as $submenu) {
-				$html .= $submenu->getMenuAsList();
-			}
-			$html .= '</ul>';
-		}
-
-		return '<li class="' . $this->class . '">' . $html . '</li>';
-	}
-
-	/**
-	 * Get the sub-menus.
-	 *
-	 * @return Menu[]
-	 */
-	public function getSubmenus() {
-		return $this->submenus;
-	}
-
-	/**
-	 * Set the sub-menus.
-	 *
-	 * @param Menu[] $submenus
-	 *
-	 * @return $this
-	 */
-	public function setSubmenus(array $submenus) {
-		$this->submenus = $submenus;
-
-		return $this;
-	}
+    /** @var string The text to be displayed in the mneu */
+    private $label;
+
+    /** @var string The target URL or href*/
+    private $link;
+
+    /** @var string The CSS class used to style this menu item */
+    private $class;
+
+    /** @var string[] A list of optional HTML attributes, such as onclick or data-xxx */
+    private $attrs;
+
+    /** @var Menu[] An optional list of sub-menus. */
+    private $submenus;
+
+    /** @var string Used internally to create javascript menus */
+    private $parentmenu;
+
+    /** @var string Used to format javascript menus */
+    private $submenuclass;
+
+    /** @var string Used to format javascript menus */
+    private $menuclass;
+
+    /**
+     * Constructor for the menu class
+     *
+     * @param string   $label    The label for the menu item
+     * @param string   $link     The target URL
+     * @param string   $class    A CSS class
+     * @param string[] $attrs    Optional attributes, such as onclick or data-xxx
+     * @param Menu[]   $submenus Any submenus
+     */
+    public function __construct($label, $link = '#', $class = '', array $attrs = array(), array $submenus = array()) {
+        $this
+            ->setLabel($label)
+            ->setLink($link)
+            ->setClass($class)
+            ->setAttrs($attrs)
+            ->setSubmenus($submenus);
+    }
+
+    /**
+     * Convert this menu to an HTML list, for easy rendering of
+     * lists of menus/nulls.
+     *
+     * @return string
+     */
+    public function __toString() {
+        return $this->getMenuAsList();
+    }
+
+    /**
+     * Render this menu using Bootstrap markup
+     *
+     * @return string
+     */
+    public function bootstrap() {
+        if ($this->submenus) {
+            $submenus = '';
+            foreach ($this->submenus as $submenu) {
+                $submenus .= $submenu->bootstrap();
+            }
+
+            return
+                '<li class="' . $this->class . ' dropdown">' .
+                '<a href="#" class="dropdown-toggle" data-toggle="dropdown" role="button" aria-expanded="false">' .
+                $this->label .
+                ' <span class="caret"></span></a>' .
+                '<ul class="dropdown-menu" role="menu">' .
+                $submenus .
+                '</ul>' .
+                '</li>';
+        } else {
+            $attrs = '';
+            foreach ($this->attrs as $key => $value) {
+                $attrs .= ' ' . $key . '="' . Filter::escapeHtml($value) . '"';
+            }
+
+            return '<li class="' . $this->class . '"><a href="' . $this->link . '"' . $attrs . '>' . $this->label . '</a></li>';
+        }
+    }
+
+    /**
+     * Get the optional attributes.
+     *
+     * @return string[]
+     */
+    public function getAttrs() {
+        return $this->attrs;
+    }
+
+    /**
+     * Set the optional attributes.
+     *
+     * @param string[] $attrs
+     *
+     * @return $this
+     */
+    public function setAttrs(array $attrs) {
+        $this->attrs = $attrs;
+
+        return $this;
+    }
+
+    /**
+     * Set the CSS classes for the (legacy) javascript menus
+     *
+     * @param string $menuclass
+     * @param string $submenuclass
+     */
+    public function addClass($menuclass, $submenuclass = '') {
+        $this->menuclass    = $menuclass;
+        $this->submenuclass = $submenuclass;
+    }
+
+    /**
+     * Get the class.
+     *
+     * @return string
+     */
+    public function getClass() {
+        return $this->class;
+    }
+
+    /**
+     * Set the class.
+     *
+     * @param string $class
+     *
+     * @return $this
+     */
+    public function setClass($class) {
+        $this->class = $class;
+
+        return $this;
+    }
+
+    /**
+     * Get the label.
+     *
+     * @return string
+     */
+    public function getLabel() {
+        return $this->label;
+    }
+
+    /**
+     * Set the label.
+     *
+     * @param string $label
+     *
+     * @return $this
+     */
+    public function setLabel($label) {
+        $this->label = $label;
+
+        return $this;
+    }
+
+    /**
+     * Get the link.
+     *
+     * @return string
+     */
+    public function getLink() {
+        return $this->link;
+    }
+
+    /**
+     * Set the link.
+     *
+     * @param string $link
+     *
+     * @return $this
+     */
+    public function setLink($link) {
+        $this->link = $link;
+
+        return $this;
+    }
+
+    /**
+     * Add a submenu to this menu
+     *
+     * @param Menu $menu
+     *
+     * @return $this
+     */
+    public function addSubmenu($menu) {
+        $this->submenus[] = $menu;
+
+        return $this;
+    }
+
+    /**
+     * Render this menu using javascript popups..
+     *
+     * @return string
+     */
+    public function getMenu() {
+        $menu_id     = 'menu-' . Uuid::uuid4();
+        $sub_menu_id = 'sub-' . $menu_id;
+
+        $html = '<a href="' . $this->link . '"';
+        foreach ($this->attrs as $key => $value) {
+            $html .= ' ' . $key . '="' . Filter::escapeHtml($value) . '"';
+        }
+        if (!empty($this->submenus)) {
+            $html .= ' onmouseover="show_submenu(\'' . $sub_menu_id . '\', \'' . $menu_id . '\');"';
+            $html .= ' onmouseout="timeout_submenu(\'' . $sub_menu_id . '\');"';
+        }
+        $html .= '>' . $this->label . '</a>';
+
+        if (!empty($this->submenus)) {
+            $html .= '<div id="' . $sub_menu_id . '" class="' . $this->submenuclass . '"';
+            $html .= ' style="position: absolute; visibility: hidden; z-index: 100; text-align: ' . (I18N::direction() === 'ltr' ? 'left' : 'right') . '"';
+            $html .= ' onmouseover="show_submenu(\'' . $this->parentmenu . '\'); show_submenu(\'' . $sub_menu_id . '\');"';
+            $html .= ' onmouseout="timeout_submenu(\'' . $sub_menu_id . '\');">';
+            foreach ($this->submenus as $submenu) {
+                $submenu->parentmenu = $sub_menu_id;
+                $html .= $submenu->getMenu();
+            }
+            $html .= '</div>';
+        }
+
+        return '<div id="' . $menu_id . '" class="' . $this->menuclass . '">' . $html . '</div>';
+    }
+
+    /**
+     * Render this menu as an HTML list
+     *
+     * @return string
+     */
+    public function getMenuAsList() {
+        $attrs = '';
+        foreach ($this->attrs as $key => $value) {
+            $attrs .= ' ' . $key . '="' . Filter::escapeHtml($value) . '"';
+        }
+        if ($this->link) {
+            $link = ' href="' . $this->link . '"';
+        } else {
+            $link = '';
+        }
+        $html = '<a' . $link . $attrs . '>' . $this->label . '</a>';
+        if ($this->submenus) {
+            $html .= '<ul>';
+            foreach ($this->submenus as $submenu) {
+                $html .= $submenu->getMenuAsList();
+            }
+            $html .= '</ul>';
+        }
+
+        return '<li class="' . $this->class . '">' . $html . '</li>';
+    }
+
+    /**
+     * Get the sub-menus.
+     *
+     * @return Menu[]
+     */
+    public function getSubmenus() {
+        return $this->submenus;
+    }
+
+    /**
+     * Set the sub-menus.
+     *
+     * @param Menu[] $submenus
+     *
+     * @return $this
+     */
+    public function setSubmenus(array $submenus) {
+        $this->submenus = $submenus;
+
+        return $this;
+    }
 }

Braces +36 added lines, -18 removed lines

@@ -20,7 +20,8 @@ 
 /**
  * System for generating menus.
  */
-class Menu {
+class Menu
+{
 	/** @var string The text to be displayed in the mneu */
 	private $label;
 
@@ -54,7 +55,8 @@ 
 	 * @param string[] $attrs    Optional attributes, such as onclick or data-xxx
 	 * @param Menu[]   $submenus Any submenus
 	 */
-	public function __construct($label, $link = '#', $class = '', array $attrs = array(), array $submenus = array()) {
+	public function __construct($label, $link = '#', $class = '', array $attrs = array(), array $submenus = array())
+	{
 		$this
 			->setLabel($label)
 			->setLink($link)
@@ -69,7 +71,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function __toString() {
+	public function __toString()
+	{
 		return $this->getMenuAsList();
 	}
 
@@ -78,7 +81,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function bootstrap() {
+	public function bootstrap()
+	{
 		if ($this->submenus) {
 			$submenus = '';
 			foreach ($this->submenus as $submenu) {
@@ -109,7 +113,8 @@ 
 	 *
 	 * @return string[]
 	 */
-	public function getAttrs() {
+	public function getAttrs()
+	{
 		return $this->attrs;
 	}
 
@@ -120,7 +125,8 @@ 
 	 *
 	 * @return $this
 	 */
-	public function setAttrs(array $attrs) {
+	public function setAttrs(array $attrs)
+	{
 		$this->attrs = $attrs;
 
 		return $this;
@@ -132,7 +138,8 @@ 
 	 * @param string $menuclass
 	 * @param string $submenuclass
 	 */
-	public function addClass($menuclass, $submenuclass = '') {
+	public function addClass($menuclass, $submenuclass = '')
+	{
 		$this->menuclass    = $menuclass;
 		$this->submenuclass = $submenuclass;
 	}
@@ -142,7 +149,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getClass() {
+	public function getClass()
+	{
 		return $this->class;
 	}
 
@@ -153,7 +161,8 @@ 
 	 *
 	 * @return $this
 	 */
-	public function setClass($class) {
+	public function setClass($class)
+	{
 		$this->class = $class;
 
 		return $this;
@@ -164,7 +173,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getLabel() {
+	public function getLabel()
+	{
 		return $this->label;
 	}
 
@@ -175,7 +185,8 @@ 
 	 *
 	 * @return $this
 	 */
-	public function setLabel($label) {
+	public function setLabel($label)
+	{
 		$this->label = $label;
 
 		return $this;
@@ -186,7 +197,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getLink() {
+	public function getLink()
+	{
 		return $this->link;
 	}
 
@@ -197,7 +209,8 @@ 
 	 *
 	 * @return $this
 	 */
-	public function setLink($link) {
+	public function setLink($link)
+	{
 		$this->link = $link;
 
 		return $this;
@@ -210,7 +223,8 @@ 
 	 *
 	 * @return $this
 	 */
-	public function addSubmenu($menu) {
+	public function addSubmenu($menu)
+	{
 		$this->submenus[] = $menu;
 
 		return $this;
@@ -221,7 +235,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getMenu() {
+	public function getMenu()
+	{
 		$menu_id     = 'menu-' . Uuid::uuid4();
 		$sub_menu_id = 'sub-' . $menu_id;
 
@@ -255,7 +270,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getMenuAsList() {
+	public function getMenuAsList()
+	{
 		$attrs = '';
 		foreach ($this->attrs as $key => $value) {
 			$attrs .= ' ' . $key . '="' . Filter::escapeHtml($value) . '"';
@@ -282,7 +298,8 @@ 
 	 *
 	 * @return Menu[]
 	 */
-	public function getSubmenus() {
+	public function getSubmenus()
+	{
 		return $this->submenus;
 	}
 
@@ -293,7 +310,8 @@ 
 	 *
 	 * @return $this
 	 */
-	public function setSubmenus(array $submenus) {
+	public function setSubmenus(array $submenus)
+	{
 		$this->submenus = $submenus;
 
 		return $this;

app/Log.php

Indentation +93 added lines, -93 removed lines

@@ -19,107 +19,107 @@
  * Record webtrees events in the database
  */
 class Log {
-	// We can log the following types of message in the wt_log table.
-	const TYPE_AUTHENTICATION = 'auth';
-	const TYPE_CONFIGURATION  = 'config';
-	const TYPE_DEBUG          = 'debug';
-	const TYPE_EDIT           = 'edit';
-	const TYPE_ERROR          = 'error';
-	const TYPE_MEDIA          = 'media';
-	const TYPE_SEARCH         = 'search';
+    // We can log the following types of message in the wt_log table.
+    const TYPE_AUTHENTICATION = 'auth';
+    const TYPE_CONFIGURATION  = 'config';
+    const TYPE_DEBUG          = 'debug';
+    const TYPE_EDIT           = 'edit';
+    const TYPE_ERROR          = 'error';
+    const TYPE_MEDIA          = 'media';
+    const TYPE_SEARCH         = 'search';
 
-	/**
-	 * Store a new message (of the appropriate type) in the message log.
-	 *
-	 * @param string    $message
-	 * @param string    $log_type
-	 * @param Tree|null $tree
-	 */
-	private static function addLog($message, $log_type, Tree $tree = null) {
-		global $WT_TREE;
+    /**
+     * Store a new message (of the appropriate type) in the message log.
+     *
+     * @param string    $message
+     * @param string    $log_type
+     * @param Tree|null $tree
+     */
+    private static function addLog($message, $log_type, Tree $tree = null) {
+        global $WT_TREE;
 
-		if (!$tree) {
-			$tree = $WT_TREE;
-		}
+        if (!$tree) {
+            $tree = $WT_TREE;
+        }
 
-		Database::prepare(
-			"INSERT INTO `##log` (log_type, log_message, ip_address, user_id, gedcom_id) VALUES (?, ?, ?, ?, ?)"
-		)->execute(array(
-					$log_type,
-					$message,
-					WT_CLIENT_IP,
-					Auth::id(),
-					$tree ? $tree->getTreeId() : null,
-		));
-	}
+        Database::prepare(
+            "INSERT INTO `##log` (log_type, log_message, ip_address, user_id, gedcom_id) VALUES (?, ?, ?, ?, ?)"
+        )->execute(array(
+                    $log_type,
+                    $message,
+                    WT_CLIENT_IP,
+                    Auth::id(),
+                    $tree ? $tree->getTreeId() : null,
+        ));
+    }
 
-	/**
-	 * Store an authentication message in the message log.
-	 *
-	 * @param string $message
-	 */
-	public static function addAuthenticationLog($message) {
-		self::addLog($message, self::TYPE_AUTHENTICATION);
-	}
+    /**
+     * Store an authentication message in the message log.
+     *
+     * @param string $message
+     */
+    public static function addAuthenticationLog($message) {
+        self::addLog($message, self::TYPE_AUTHENTICATION);
+    }
 
-	/**
-	 * Store a configuration message in the message log.
-	 *
-	 * @param string       $message
-	 * @param Tree|null $tree
-	 */
-	public static function addConfigurationLog($message, Tree $tree = null) {
-		self::addLog($message, self::TYPE_CONFIGURATION, $tree);
-	}
+    /**
+     * Store a configuration message in the message log.
+     *
+     * @param string       $message
+     * @param Tree|null $tree
+     */
+    public static function addConfigurationLog($message, Tree $tree = null) {
+        self::addLog($message, self::TYPE_CONFIGURATION, $tree);
+    }
 
-	/**
-	 * Store a debug message in the message log.
-	 *
-	 * @param string $message
-	 */
-	public static function addDebugLog($message) {
-		self::addLog($message, self::TYPE_DEBUG);
-	}
+    /**
+     * Store a debug message in the message log.
+     *
+     * @param string $message
+     */
+    public static function addDebugLog($message) {
+        self::addLog($message, self::TYPE_DEBUG);
+    }
 
-	/**
-	 * Store an edit message in the message log.
-	 *
-	 * @param string $message
-	 */
-	public static function addEditLog($message) {
-		self::addLog($message, self::TYPE_EDIT);
-	}
+    /**
+     * Store an edit message in the message log.
+     *
+     * @param string $message
+     */
+    public static function addEditLog($message) {
+        self::addLog($message, self::TYPE_EDIT);
+    }
 
-	/**
-	 * Store an error message in the message log.
-	 *
-	 * @param string $message
-	 */
-	public static function addErrorLog($message) {
-		self::addLog($message, self::TYPE_ERROR);
-	}
+    /**
+     * Store an error message in the message log.
+     *
+     * @param string $message
+     */
+    public static function addErrorLog($message) {
+        self::addLog($message, self::TYPE_ERROR);
+    }
 
-	/**
-	 * Store an media management message in the message log.
-	 *
-	 * @param string $message
-	 */
-	public static function addMediaLog($message) {
-		self::addLog($message, self::TYPE_MEDIA);
-	}
+    /**
+     * Store an media management message in the message log.
+     *
+     * @param string $message
+     */
+    public static function addMediaLog($message) {
+        self::addLog($message, self::TYPE_MEDIA);
+    }
 
-	/**
-	 * Store a search event in the message log.
-	 *
-	 * Unlike most webtrees activity, search is not restricted to a single tree,
-	 * so we need to record which trees were searchecd.
-	 *
-	 * @param string    $message
-	 * @param Tree[] $trees Which trees were searched
-	 */
-	public static function addSearchLog($message, array $trees) {
-		foreach ($trees as $tree) {
-			self::addLog($message, self::TYPE_SEARCH, $tree);
-		}
-	}
+    /**
+     * Store a search event in the message log.
+     *
+     * Unlike most webtrees activity, search is not restricted to a single tree,
+     * so we need to record which trees were searchecd.
+     *
+     * @param string    $message
+     * @param Tree[] $trees Which trees were searched
+     */
+    public static function addSearchLog($message, array $trees) {
+        foreach ($trees as $tree) {
+            self::addLog($message, self::TYPE_SEARCH, $tree);
+        }
+    }
 }

Braces +18 added lines, -9 removed lines

@@ -18,7 +18,8 @@ 
 /**
  * Record webtrees events in the database
  */
-class Log {
+class Log
+{
 	// We can log the following types of message in the wt_log table.
 	const TYPE_AUTHENTICATION = 'auth';
 	const TYPE_CONFIGURATION  = 'config';
@@ -35,7 +36,8 @@ 
 	 * @param string    $log_type
 	 * @param Tree|null $tree
 	 */
-	private static function addLog($message, $log_type, Tree $tree = null) {
+	private static function addLog($message, $log_type, Tree $tree = null)
+	{
 		global $WT_TREE;
 
 		if (!$tree) {
@@ -58,7 +60,8 @@ 
 	 *
 	 * @param string $message
 	 */
-	public static function addAuthenticationLog($message) {
+	public static function addAuthenticationLog($message)
+	{
 		self::addLog($message, self::TYPE_AUTHENTICATION);
 	}
 
@@ -68,7 +71,8 @@ 
 	 * @param string       $message
 	 * @param Tree|null $tree
 	 */
-	public static function addConfigurationLog($message, Tree $tree = null) {
+	public static function addConfigurationLog($message, Tree $tree = null)
+	{
 		self::addLog($message, self::TYPE_CONFIGURATION, $tree);
 	}
 
@@ -77,7 +81,8 @@ 
 	 *
 	 * @param string $message
 	 */
-	public static function addDebugLog($message) {
+	public static function addDebugLog($message)
+	{
 		self::addLog($message, self::TYPE_DEBUG);
 	}
 
@@ -86,7 +91,8 @@ 
 	 *
 	 * @param string $message
 	 */
-	public static function addEditLog($message) {
+	public static function addEditLog($message)
+	{
 		self::addLog($message, self::TYPE_EDIT);
 	}
 
@@ -95,7 +101,8 @@ 
 	 *
 	 * @param string $message
 	 */
-	public static function addErrorLog($message) {
+	public static function addErrorLog($message)
+	{
 		self::addLog($message, self::TYPE_ERROR);
 	}
 
@@ -104,7 +111,8 @@ 
 	 *
 	 * @param string $message
 	 */
-	public static function addMediaLog($message) {
+	public static function addMediaLog($message)
+	{
 		self::addLog($message, self::TYPE_MEDIA);
 	}
 
@@ -117,7 +125,8 @@ 
 	 * @param string    $message
 	 * @param Tree[] $trees Which trees were searched
 	 */
-	public static function addSearchLog($message, array $trees) {
+	public static function addSearchLog($message, array $trees)
+	{
 		foreach ($trees as $tree) {
 			self::addLog($message, self::TYPE_SEARCH, $tree);
 		}

app/GedcomTag.php

Indentation +1945 added lines, -1945 removed lines

@@ -21,1966 +21,1966 @@
  * Static GEDCOM data for tags
  */
 class GedcomTag {
-	/** @var string[] All tags that webtrees knows how to translate - including special/internal tags */
-	private static $ALL_TAGS = array(
-		'ABBR', 'ADDR', 'ADR1', 'ADR2', 'ADOP', 'ADOP:DATE', 'ADOP:PLAC',
-		'AFN', 'AGE', 'AGNC', 'ALIA', 'ANCE', 'ANCI', 'ANUL', 'ASSO', 'AUTH', 'BAPL',
-		'BAPL:DATE', 'BAPL:PLAC', 'BAPM', 'BAPM:DATE', 'BAPM:PLAC', 'BARM',
-		'BARM:DATE', 'BARM:PLAC', 'BASM', 'BASM:DATE', 'BASM:PLAC',
-		'BIRT', 'BIRT:DATE', 'BIRT:PLAC', 'BLES', 'BLES:DATE',
-		'BLES:PLAC', 'BLOB', 'BURI', 'BURI:DATE', 'BURI:PLAC',
-		'CALN', 'CAST', 'CAUS', 'CEME', 'CENS', 'CENS:DATE', 'CENS:PLAC', 'CHAN', 'CHAN:DATE', 'CHAN:_WT_USER', 'CHAR',
-		'CHIL', 'CHR', 'CHR:DATE', 'CHR:PLAC', 'CHRA', 'CITN', 'CITY',
-		'COMM', 'CONC', 'CONT', 'CONF', 'CONF:DATE', 'CONF:PLAC', 'CONL',
-		'COPR', 'CORP', 'CREM', 'CREM:DATE', 'CREM:PLAC', 'CTRY', 'DATA',
-		'DATA:DATE', 'DATE', 'DEAT', 'DEAT:CAUS', 'DEAT:DATE', 'DEAT:PLAC',
-		'DESC', 'DESI', 'DEST', 'DIV', 'DIVF', 'DSCR', 'EDUC', 'EDUC:AGNC', 'EMAI',
-		'EMAIL', 'EMAL', 'EMIG', 'EMIG:DATE', 'EMIG:PLAC', 'ENDL', 'ENDL:DATE',
-		'ENDL:PLAC', 'ENGA', 'ENGA:DATE', 'ENGA:PLAC', 'EVEN', 'EVEN:DATE',
-		'EVEN:PLAC', 'EVEN:TYPE', 'FACT', 'FACT:TYPE', 'FAM', 'FAMC', 'FAMF', 'FAMS', 'FAMS:CENS:DATE', 'FAMS:CENS:PLAC',
-		'FAMS:DIV:DATE', 'FAMS:MARR:DATE', 'FAMS:MARR:PLAC', 'FAMS:NOTE',
-		'FAX', 'FCOM', 'FCOM:DATE',
-		'FCOM:PLAC', 'FILE', 'FONE', 'FORM', 'GEDC', 'GIVN', 'GRAD',
-		'HEAD', 'HUSB', 'IDNO', 'IMMI', 'IMMI:DATE', 'IMMI:PLAC', 'INDI', 'INFL',
-		'LANG', 'LATI', 'LEGA', 'LONG', 'MAP', 'MARB', 'MARB:DATE', 'MARB:PLAC',
-		'MARC', 'MARL', 'MARR', 'MARR:DATE', 'MARR:PLAC',
-		'MARR_CIVIL', 'MARR_PARTNERS', 'MARR_RELIGIOUS', 'MARR_UNKNOWN', 'MARS',
-		'MEDI', 'NAME', 'NAME:FONE', 'NAME:_HEB', 'NATI', 'NATU', 'NATU:DATE', 'NATU:PLAC',
-		'NCHI', 'NICK', 'NMR', 'NOTE', 'NPFX', 'NSFX', 'OBJE', 'OCCU', 'OCCU:AGNC',
-		'ORDI', 'ORDN', 'ORDN:AGNC', 'ORDN:DATE', 'ORDN:PLAC', 'PAGE', 'PEDI', 'PHON',
-		'PLAC', 'PLAC:FONE', 'PLAC:ROMN', 'PLAC:_HEB', 'POST', 'PROB', 'PROP', 'PUBL',
-		'QUAY', 'REFN', 'RELA', 'RELI', 'REPO', 'RESI', 'RESI:DATE', 'RESI:PLAC', 'RESN',
-		'RETI', 'RETI:AGNC', 'RFN', 'RIN', 'ROLE', 'ROMN', 'SERV', 'SEX', 'SHARED_NOTE',
-		'SLGC', 'SLGC:DATE', 'SLGC:PLAC', 'SLGS', 'SLGS:DATE', 'SLGS:PLAC', 'SOUR',
-		'SPFX', 'SSN', 'STAE', 'STAT', 'STAT:DATE', 'SUBM', 'SUBN', 'SURN', 'TEMP',
-		'TEXT', 'TIME', 'TITL', 'TITL:FONE', 'TITL:ROMN', 'TITL:_HEB', 'TRLR', 'TYPE',
-		'URL', 'VERS', 'WIFE', 'WILL', 'WWW', '_ADOP_CHIL', '_ADOP_GCHI', '_ADOP_GCH1',
-		'_ADOP_GCH2', '_ADOP_HSIB', '_ADOP_SIBL', '_ADPF', '_ADPM', '_AKA', '_AKAN', '_ASSO',
-		'_BAPM_CHIL', '_BAPM_GCHI', '_BAPM_GCH1', '_BAPM_GCH2', '_BAPM_HSIB', '_BAPM_SIBL',
-		'_BIBL', '_BIRT_CHIL', '_BIRT_GCHI', '_BIRT_GCH1', '_BIRT_GCH2', '_BIRT_HSIB', '_BIRT_SIBL',
-		'_BRTM', '_BRTM:DATE', '_BRTM:PLAC', '_BURI_CHIL',
-		'_BURI_GCHI', '_BURI_GCH1', '_BURI_GCH2', '_BURI_GPAR', '_BURI_HSIB', '_BURI_SIBL', '_BURI_SPOU',
-		'_CHR_CHIL', '_CHR_GCHI', '_CHR_GCH1', '_CHR_GCH2', '_CHR_HSIB', '_CHR_SIBL', '_COML',
-		'_CREM_CHIL', '_CREM_GCHI', '_CREM_GCH1', '_CREM_GCH2', '_CREM_GPAR', '_CREM_HSIB', '_CREM_SIBL', '_CREM_SPOU',
-		'_DBID', '_DEAT_CHIL', '_DEAT_GCHI', '_DEAT_GCH1', '_DEAT_GCH2', '_DEAT_GPAR', '_DEAT_GPA1', '_DEAT_GPA2',
-		'_DEAT_HSIB', '_DEAT_PARE', '_DEAT_SIBL', '_DEAT_SPOU', '_DEG', '_DETS', '_DNA',
-		'_EMAIL', '_EYEC', '_FA1', '_FA2', '_FA3', '_FA4', '_FA5', '_FA6', '_FA7', '_FA8',
-		'_FA9', '_FA10', '_FA11', '_FA12', '_FA13', '_FNRL', '_FREL', '_GEDF', '_GODP', '_HAIR',
-		'_HEB', '_HEIG', '_HNM', '_HOL', '_INTE', '_LOC', '_MARB_CHIL', '_MARB_FAMC', '_MARB_GCHI',
-		'_MARB_GCH1', '_MARB_GCH2', '_MARB_HSIB', '_MARB_PARE', '_MARB_SIBL', '_MARI',
-		'_MARNM', '_PRIM', '_MARNM_SURN', '_MARR_CHIL', '_MARR_FAMC', '_MARR_GCHI',
-		'_MARR_GCH1', '_MARR_GCH2', '_MARR_HSIB', '_MARR_PARE', '_MARR_SIBL', '_MBON',
-		'_MDCL', '_MEDC', '_MEND', '_MILI', '_MILT', '_MREL', '_MSTAT', '_NAME', '_NAMS',
-		'_NLIV', '_NMAR', '_NMR', '_WT_USER', '_PRMN', '_SCBK', '_SEPR', '_SSHOW', '_STAT',
-		'_SUBQ', '_TODO', '_TYPE', '_UID', '_URL', '_WEIG', '_WITN', '_YART', '__BRTM_CHIL',
-		'__BRTM_GCHI', '__BRTM_GCH1', '__BRTM_GCH2', '__BRTM_HSIB', '__BRTM_SIBL',
-		// These pseudo-tags are generated dynamically to display media object attributes
-		'__FILE_SIZE__', '__IMAGE_SIZE__',
-	);
+    /** @var string[] All tags that webtrees knows how to translate - including special/internal tags */
+    private static $ALL_TAGS = array(
+        'ABBR', 'ADDR', 'ADR1', 'ADR2', 'ADOP', 'ADOP:DATE', 'ADOP:PLAC',
+        'AFN', 'AGE', 'AGNC', 'ALIA', 'ANCE', 'ANCI', 'ANUL', 'ASSO', 'AUTH', 'BAPL',
+        'BAPL:DATE', 'BAPL:PLAC', 'BAPM', 'BAPM:DATE', 'BAPM:PLAC', 'BARM',
+        'BARM:DATE', 'BARM:PLAC', 'BASM', 'BASM:DATE', 'BASM:PLAC',
+        'BIRT', 'BIRT:DATE', 'BIRT:PLAC', 'BLES', 'BLES:DATE',
+        'BLES:PLAC', 'BLOB', 'BURI', 'BURI:DATE', 'BURI:PLAC',
+        'CALN', 'CAST', 'CAUS', 'CEME', 'CENS', 'CENS:DATE', 'CENS:PLAC', 'CHAN', 'CHAN:DATE', 'CHAN:_WT_USER', 'CHAR',
+        'CHIL', 'CHR', 'CHR:DATE', 'CHR:PLAC', 'CHRA', 'CITN', 'CITY',
+        'COMM', 'CONC', 'CONT', 'CONF', 'CONF:DATE', 'CONF:PLAC', 'CONL',
+        'COPR', 'CORP', 'CREM', 'CREM:DATE', 'CREM:PLAC', 'CTRY', 'DATA',
+        'DATA:DATE', 'DATE', 'DEAT', 'DEAT:CAUS', 'DEAT:DATE', 'DEAT:PLAC',
+        'DESC', 'DESI', 'DEST', 'DIV', 'DIVF', 'DSCR', 'EDUC', 'EDUC:AGNC', 'EMAI',
+        'EMAIL', 'EMAL', 'EMIG', 'EMIG:DATE', 'EMIG:PLAC', 'ENDL', 'ENDL:DATE',
+        'ENDL:PLAC', 'ENGA', 'ENGA:DATE', 'ENGA:PLAC', 'EVEN', 'EVEN:DATE',
+        'EVEN:PLAC', 'EVEN:TYPE', 'FACT', 'FACT:TYPE', 'FAM', 'FAMC', 'FAMF', 'FAMS', 'FAMS:CENS:DATE', 'FAMS:CENS:PLAC',
+        'FAMS:DIV:DATE', 'FAMS:MARR:DATE', 'FAMS:MARR:PLAC', 'FAMS:NOTE',
+        'FAX', 'FCOM', 'FCOM:DATE',
+        'FCOM:PLAC', 'FILE', 'FONE', 'FORM', 'GEDC', 'GIVN', 'GRAD',
+        'HEAD', 'HUSB', 'IDNO', 'IMMI', 'IMMI:DATE', 'IMMI:PLAC', 'INDI', 'INFL',
+        'LANG', 'LATI', 'LEGA', 'LONG', 'MAP', 'MARB', 'MARB:DATE', 'MARB:PLAC',
+        'MARC', 'MARL', 'MARR', 'MARR:DATE', 'MARR:PLAC',
+        'MARR_CIVIL', 'MARR_PARTNERS', 'MARR_RELIGIOUS', 'MARR_UNKNOWN', 'MARS',
+        'MEDI', 'NAME', 'NAME:FONE', 'NAME:_HEB', 'NATI', 'NATU', 'NATU:DATE', 'NATU:PLAC',
+        'NCHI', 'NICK', 'NMR', 'NOTE', 'NPFX', 'NSFX', 'OBJE', 'OCCU', 'OCCU:AGNC',
+        'ORDI', 'ORDN', 'ORDN:AGNC', 'ORDN:DATE', 'ORDN:PLAC', 'PAGE', 'PEDI', 'PHON',
+        'PLAC', 'PLAC:FONE', 'PLAC:ROMN', 'PLAC:_HEB', 'POST', 'PROB', 'PROP', 'PUBL',
+        'QUAY', 'REFN', 'RELA', 'RELI', 'REPO', 'RESI', 'RESI:DATE', 'RESI:PLAC', 'RESN',
+        'RETI', 'RETI:AGNC', 'RFN', 'RIN', 'ROLE', 'ROMN', 'SERV', 'SEX', 'SHARED_NOTE',
+        'SLGC', 'SLGC:DATE', 'SLGC:PLAC', 'SLGS', 'SLGS:DATE', 'SLGS:PLAC', 'SOUR',
+        'SPFX', 'SSN', 'STAE', 'STAT', 'STAT:DATE', 'SUBM', 'SUBN', 'SURN', 'TEMP',
+        'TEXT', 'TIME', 'TITL', 'TITL:FONE', 'TITL:ROMN', 'TITL:_HEB', 'TRLR', 'TYPE',
+        'URL', 'VERS', 'WIFE', 'WILL', 'WWW', '_ADOP_CHIL', '_ADOP_GCHI', '_ADOP_GCH1',
+        '_ADOP_GCH2', '_ADOP_HSIB', '_ADOP_SIBL', '_ADPF', '_ADPM', '_AKA', '_AKAN', '_ASSO',
+        '_BAPM_CHIL', '_BAPM_GCHI', '_BAPM_GCH1', '_BAPM_GCH2', '_BAPM_HSIB', '_BAPM_SIBL',
+        '_BIBL', '_BIRT_CHIL', '_BIRT_GCHI', '_BIRT_GCH1', '_BIRT_GCH2', '_BIRT_HSIB', '_BIRT_SIBL',
+        '_BRTM', '_BRTM:DATE', '_BRTM:PLAC', '_BURI_CHIL',
+        '_BURI_GCHI', '_BURI_GCH1', '_BURI_GCH2', '_BURI_GPAR', '_BURI_HSIB', '_BURI_SIBL', '_BURI_SPOU',
+        '_CHR_CHIL', '_CHR_GCHI', '_CHR_GCH1', '_CHR_GCH2', '_CHR_HSIB', '_CHR_SIBL', '_COML',
+        '_CREM_CHIL', '_CREM_GCHI', '_CREM_GCH1', '_CREM_GCH2', '_CREM_GPAR', '_CREM_HSIB', '_CREM_SIBL', '_CREM_SPOU',
+        '_DBID', '_DEAT_CHIL', '_DEAT_GCHI', '_DEAT_GCH1', '_DEAT_GCH2', '_DEAT_GPAR', '_DEAT_GPA1', '_DEAT_GPA2',
+        '_DEAT_HSIB', '_DEAT_PARE', '_DEAT_SIBL', '_DEAT_SPOU', '_DEG', '_DETS', '_DNA',
+        '_EMAIL', '_EYEC', '_FA1', '_FA2', '_FA3', '_FA4', '_FA5', '_FA6', '_FA7', '_FA8',
+        '_FA9', '_FA10', '_FA11', '_FA12', '_FA13', '_FNRL', '_FREL', '_GEDF', '_GODP', '_HAIR',
+        '_HEB', '_HEIG', '_HNM', '_HOL', '_INTE', '_LOC', '_MARB_CHIL', '_MARB_FAMC', '_MARB_GCHI',
+        '_MARB_GCH1', '_MARB_GCH2', '_MARB_HSIB', '_MARB_PARE', '_MARB_SIBL', '_MARI',
+        '_MARNM', '_PRIM', '_MARNM_SURN', '_MARR_CHIL', '_MARR_FAMC', '_MARR_GCHI',
+        '_MARR_GCH1', '_MARR_GCH2', '_MARR_HSIB', '_MARR_PARE', '_MARR_SIBL', '_MBON',
+        '_MDCL', '_MEDC', '_MEND', '_MILI', '_MILT', '_MREL', '_MSTAT', '_NAME', '_NAMS',
+        '_NLIV', '_NMAR', '_NMR', '_WT_USER', '_PRMN', '_SCBK', '_SEPR', '_SSHOW', '_STAT',
+        '_SUBQ', '_TODO', '_TYPE', '_UID', '_URL', '_WEIG', '_WITN', '_YART', '__BRTM_CHIL',
+        '__BRTM_GCHI', '__BRTM_GCH1', '__BRTM_GCH2', '__BRTM_HSIB', '__BRTM_SIBL',
+        // These pseudo-tags are generated dynamically to display media object attributes
+        '__FILE_SIZE__', '__IMAGE_SIZE__',
+    );
 
-	/** @var string[] Possible values for the Object-File-Format types */
-	private static $OBJE_FILE_FORM_TYPE = array(
-		'audio', 'book', 'card', 'certificate', 'coat', 'document', 'electronic',
-		'fiche', 'film', 'magazine', 'manuscript', 'map', 'newspaper', 'photo',
-		'tombstone', 'video', 'painting', 'other',
-	);
+    /** @var string[] Possible values for the Object-File-Format types */
+    private static $OBJE_FILE_FORM_TYPE = array(
+        'audio', 'book', 'card', 'certificate', 'coat', 'document', 'electronic',
+        'fiche', 'film', 'magazine', 'manuscript', 'map', 'newspaper', 'photo',
+        'tombstone', 'video', 'painting', 'other',
+    );
 
-	/**
-	 * Is $tag one of our known tags?
-	 *
-	 * @param string $tag
-	 *
-	 * @return bool
-	 */
-	public static function isTag($tag) {
-		return in_array($tag, self::$ALL_TAGS);
-	}
+    /**
+     * Is $tag one of our known tags?
+     *
+     * @param string $tag
+     *
+     * @return bool
+     */
+    public static function isTag($tag) {
+        return in_array($tag, self::$ALL_TAGS);
+    }
 
-	/**
-	 * Translate a tag, for an (optional) record
-	 *
-	 * @param string               $tag
-	 * @param GedcomRecord|null $record
-	 *
-	 * @return string
-	 */
-	public static function getLabel($tag, GedcomRecord $record = null) {
-		if ($record instanceof Individual) {
-			$sex = $record->getSex();
-		} else {
-			$sex = 'U';
-		}
+    /**
+     * Translate a tag, for an (optional) record
+     *
+     * @param string               $tag
+     * @param GedcomRecord|null $record
+     *
+     * @return string
+     */
+    public static function getLabel($tag, GedcomRecord $record = null) {
+        if ($record instanceof Individual) {
+            $sex = $record->getSex();
+        } else {
+            $sex = 'U';
+        }
 
-		switch ($tag) {
-		case 'ABBR':
-			return
-				/* I18N: gedcom tag ABBR */
-				I18N::translate('Abbreviation');
-		case 'ADDR':
-			return
-				/* I18N: gedcom tag ADDR */
-				I18N::translate('Address');
-		case 'ADR1':
-			return I18N::translate('Address line 1');
-		case 'ADR2':
-			return I18N::translate('Address line 2');
-		case 'ADOP':
-			return
-				/* I18N: gedcom tag ADOP */
-				I18N::translate('Adoption');
-		case 'ADOP:DATE':
-			return I18N::translate('Date of adoption');
-		case 'ADOP:PLAC':
-			return I18N::translate('Place of adoption');
-		case 'AFN':
-			return
-				/* I18N: gedcom tag AFN */
-				I18N::translate('Ancestral file number');
-		case 'AGE':
-			return
-				/* I18N: gedcom tag AGE */
-				I18N::translate('Age');
-		case 'AGNC':
-			return
-				/* I18N: gedcom tag AGNC */
-				I18N::translate('Agency');
-		case 'ALIA':
-			return
-				/* I18N: gedcom tag ALIA */
-				I18N::translate('Alias');
-		case 'ANCE':
-			return
-				/* I18N: gedcom tag ANCE */
-				I18N::translate('Generations of ancestors');
-		case 'ANCI':
-			return
-				/* I18N: gedcom tag ANCI */
-				I18N::translate('Ancestors interest');
-		case 'ANUL':
-			return
-				/* I18N: gedcom tag ANUL */
-				I18N::translate('Annulment');
-		case 'ASSO':
-			return
-				/* I18N: gedcom tag ASSO */
-				I18N::translate('Associate'); /* see also _ASSO */
-		case 'AUTH':
-			return
-				/* I18N: gedcom tag AUTH */
-				I18N::translate('Author');
-		case 'BAPL':
-			return
-				/* I18N: gedcom tag BAPL. LDS = Church of Latter Day Saints. */
-				I18N::translate('LDS baptism');
-		case 'BAPL:DATE':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS baptism');
-		case 'BAPL:PLAC':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS baptism');
-		case 'BAPM':
-			return
-				/* I18N: gedcom tag BAPM */
-				I18N::translate('Baptism');
-		case 'BAPM:DATE':
-			return I18N::translate('Date of baptism');
-		case 'BAPM:PLAC':
-			return I18N::translate('Place of baptism');
-		case 'BARM':
-			return
-				/* I18N: gedcom tag BARM */
-				I18N::translate('Bar mitzvah');
-		case 'BARM:DATE':
-			return I18N::translate('Date of bar mitzvah');
-		case 'BARM:PLAC':
-			return I18N::translate('Place of bar mitzvah');
-		case 'BASM':
-			return
-				/* I18N: gedcom tag BASM */
-				I18N::translate('Bat mitzvah');
-		case 'BASM:DATE':
-			return I18N::translate('Date of bat mitzvah');
-		case 'BASM:PLAC':
-			return I18N::translate('Place of bat mitzvah');
-		case 'BIRT':
-			return
-				/* I18N: gedcom tag BIRT */
-				I18N::translate('Birth');
-		case 'BIRT:DATE':
-			return I18N::translate('Date of birth');
-		case 'BIRT:PLAC':
-			return I18N::translate('Place of birth');
-		case 'BLES':
-			return
-				/* I18N: gedcom tag BLES */
-				I18N::translate('Blessing');
-		case 'BLES:DATE':
-			return I18N::translate('Date of blessing');
-		case 'BLES:PLAC':
-			return I18N::translate('Place of blessing');
-		case 'BLOB':
-			return
-				/* I18N: gedcom tag BLOB */
-				I18N::translate('Binary data object');
-		case 'BURI':
-			return
-				/* I18N: gedcom tag BURI */
-				I18N::translate('Burial');
-		case 'BURI:DATE':
-			return I18N::translate('Date of burial');
-		case 'BURI:PLAC':
-			return I18N::translate('Place of burial');
-		case 'CALN':
-			return
-				/* I18N: gedcom tag CALN */
-				I18N::translate('Call number');
-		case 'CAST':
-			return
-				/* I18N: gedcom tag CAST */
-				I18N::translate('Caste');
-		case 'CAUS':
-			return
-				/* I18N: gedcom tag CAUS */
-				I18N::translate('Cause');
-		case 'CEME':
-			return
-				/* I18N: gedcom tag CEME */
-				I18N::translate('Cemetery');
-		case 'CENS':
-			return
-				/* I18N: gedcom tag CENS */
-				I18N::translate('Census');
-		case 'CENS:DATE':
-			return I18N::translate('Census date');
-		case 'CENS:PLAC':
-			return I18N::translate('Census place');
-		case 'CHAN':
-			return
-				/* I18N: gedcom tag CHAN */
-				I18N::translate('Last change');
-		case 'CHAN:DATE':
-			return
-				/* I18N: gedcom tag CHAN:DATE */
-				I18N::translate('Date of last change');
-		case 'CHAN:_WT_USER':
-			return
-				/* I18N: gedcom tag CHAN:_WT_USER */
-				I18N::translate('Author of last change');
-		case 'CHAR':
-			return
-				/* I18N: gedcom tag CHAR */
-				I18N::translate('Character set');
-		case 'CHIL':
-			return
-				/* I18N: gedcom tag CHIL */
-				I18N::translate('Child');
-		case 'CHR':
-			return
-				/* I18N: gedcom tag CHR */
-				I18N::translate('Christening');
-		case 'CHR:DATE':
-			return I18N::translate('Date of christening');
-		case 'CHR:PLAC':
-			return I18N::translate('Place of christening');
-		case 'CHRA':
-			return
-				/* I18N: gedcom tag CHRA */
-				I18N::translate('Adult christening');
-		case 'CITN':
-			return
-				/* I18N: gedcom tag CITN */
-				I18N::translate('Citizenship');
-		case 'CITY':
-			return
-				/* I18N: gedcom tag CITY */
-				I18N::translate('City');
-		case 'COMM':
-			return
-				/* I18N: gedcom tag COMM */
-				I18N::translate('Comment');
-		case 'CONC':
-			return
-				/* I18N: gedcom tag CONC */
-				I18N::translate('Concatenation');
-		case 'CONT':
-			return
-				/* I18N: gedcom tag CONT */
-				I18N::translate('Continued');
-		case 'CONF':
-			return
-				/* I18N: gedcom tag CONF */
-				I18N::translate('Confirmation');
-		case 'CONF:DATE':
-			return I18N::translate('Date of confirmation');
-		case 'CONF:PLAC':
-			return I18N::translate('Place of confirmation');
-		case 'CONL':
-			return
-				/* I18N: gedcom tag CONL. LDS = Church of Latter Day Saints. */
-				I18N::translate('LDS confirmation');
-		case 'COPR':
-			return
-				/* I18N: gedcom tag COPR */
-				I18N::translate('Copyright');
-		case 'CORP':
-			return
-				/* I18N: gedcom tag CORP */
-				I18N::translate('Corporation');
-		case 'CREM':
-			return
-				/* I18N: gedcom tag CREM */
-				I18N::translate('Cremation');
-		case 'CREM:DATE':
-			return I18N::translate('Date of cremation');
-		case 'CREM:PLAC':
-			return I18N::translate('Place of cremation');
-		case 'CTRY':
-			return
-				/* I18N: gedcom tag CTRY */
-				I18N::translate('Country');
-		case 'DATA':
-			return
-				/* I18N: gedcom tag DATA */
-				I18N::translate('Data');
-		case 'DATA:DATE':
-			return I18N::translate('Date of entry in original source');
-		case 'DATE':
-			return
-				/* I18N: gedcom tag DATE */
-				I18N::translate('Date');
-		case 'DEAT':
-			return
-				/* I18N: gedcom tag DEAT */
-				I18N::translate('Death');
-		case 'DEAT:CAUS':
-			return I18N::translate('Cause of death');
-		case 'DEAT:DATE':
-			return I18N::translate('Date of death');
-		case 'DEAT:PLAC':
-			return I18N::translate('Place of death');
-		case 'DESC':
-			return
-				/* I18N: gedcom tag DESC */
-				I18N::translate('Descendants');
-		case 'DESI':
-			return
-				/* I18N: gedcom tag DESI */
-				I18N::translate('Descendants interest');
-		case 'DEST':
-			return
-				/* I18N: gedcom tag DEST */
-				I18N::translate('Destination');
-		case 'DIV':
-			return
-				/* I18N: gedcom tag DIV */
-				I18N::translate('Divorce');
-		case 'DIVF':
-			return
-				/* I18N: gedcom tag DIVF */
-				I18N::translate('Divorce filed');
-		case 'DSCR':
-			return
-				/* I18N: gedcom tag DSCR */
-				I18N::translate('Description');
-		case 'EDUC':
-			return
-				/* I18N: gedcom tag EDUC */
-				I18N::translate('Education');
-		case 'EDUC:AGNC':
-			return I18N::translate('School or college');
-		case 'EMAI':
-			return
-				/* I18N: gedcom tag EMAI */
-				I18N::translate('Email address');
-		case 'EMAIL':
-			return
-				/* I18N: gedcom tag EMAIL */
-				I18N::translate('Email address');
-		case 'EMAL':
-			return
-				/* I18N: gedcom tag EMAL */
-				I18N::translate('Email address');
-		case 'EMIG':
-			return
-				/* I18N: gedcom tag EMIG */
-				I18N::translate('Emigration');
-		case 'EMIG:DATE':
-			return I18N::translate('Date of emigration');
-		case 'EMIG:PLAC':
-			return I18N::translate('Place of emigration');
-		case 'ENDL':
-			return
-				/* I18N: gedcom tag ENDL. LDS = Church of Latter Day Saints. */
-				I18N::translate('LDS endowment');
-		case 'ENDL:DATE':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS endowment');
-		case 'ENDL:PLAC':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS endowment');
-		case 'ENGA':
-			return
-				/* I18N: gedcom tag ENGA */
-				I18N::translate('Engagement');
-		case 'ENGA:DATE':
-			return I18N::translate('Date of engagement');
-		case 'ENGA:PLAC':
-			return I18N::translate('Place of engagement');
-		case 'EVEN':
-			return
-				/* I18N: gedcom tag EVEN */
-				I18N::translate('Event');
-		case 'EVEN:DATE':
-			return I18N::translate('Date of event');
-		case 'EVEN:PLAC':
-			return I18N::translate('Place of event');
-		case 'EVEN:TYPE':
-			return I18N::translate('Type of event');
-		case 'FACT':
-			return
-				/* I18N: gedcom tag FACT */
-				I18N::translate('Fact');
-		case 'FACT:TYPE':
-			return I18N::translate('Type of fact');
-		case 'FAM':
-			return
-				/* I18N: gedcom tag FAM */
-				I18N::translate('Family');
-		case 'FAMC':
-			return
-				/* I18N: gedcom tag FAMC */
-				I18N::translate('Family as a child');
-		case 'FAMF':
-			return
-				/* I18N: gedcom tag FAMF */
-				I18N::translate('Family file');
-		case 'FAMS':
-			return
-				/* I18N: gedcom tag FAMS */
-				I18N::translate('Family as a spouse');
-		case 'FAMS:CENS:DATE':
-			return I18N::translate('Spouse census date');
-		case 'FAMS:CENS:PLAC':
-			return I18N::translate('Spouse census place');
-		case 'FAMS:DIV:DATE':
-			return I18N::translate('Date of divorce');
-		case 'FAMS:MARR:DATE':
-			return I18N::translate('Date of marriage');
-		case 'FAMS:MARR:PLAC':
-			return I18N::translate('Place of marriage');
-		case 'FAMS:NOTE':
-			return I18N::translate('Spouse note');
-		case 'FAMS:SLGS:DATE':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS spouse sealing');
-		case 'FAMS:SLGS:PLAC':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS spouse sealing');
-		case 'FAX':
-			return
-				/* I18N: gedcom tag FAX */
-				I18N::translate('Fax');
-		case 'FCOM':
-			return
-				/* I18N: gedcom tag FCOM */
-				I18N::translate('First communion');
-		case 'FCOM:DATE':
-			return I18N::translate('Date of first communion');
-		case 'FCOM:PLAC':
-			return I18N::translate('Place of first communion');
-		case 'FILE':
-			return
-				/* I18N: gedcom tag FILE */
-				I18N::translate('Filename');
-		case 'FONE':
-			return
-				/* I18N: gedcom tag FONE */
-				I18N::translate('Phonetic');
-		case 'FORM':
-			return
-				/* I18N: gedcom tag FORM */
-				I18N::translate('Format');
-		case 'GEDC':
-			return
-				/* I18N: gedcom tag GEDC */
-				I18N::translate('GEDCOM file');
-		case 'GIVN':
-			return
-				/* I18N: gedcom tag GIVN */
-				I18N::translate('Given names');
-		case 'GRAD':
-			return
-				/* I18N: gedcom tag GRAD */
-				I18N::translate('Graduation');
-		case 'HEAD':
-			return
-				/* I18N: gedcom tag HEAD */
-				I18N::translate('Header');
-		case 'HUSB':
-			return
-				/* I18N: gedcom tag HUSB */
-				I18N::translate('Husband');
-		case 'IDNO':
-			return
-				/* I18N: gedcom tag IDNO */
-				I18N::translate('Identification number');
-		case 'IMMI':
-			return
-				/* I18N: gedcom tag IMMI */
-				I18N::translate('Immigration');
-		case 'IMMI:DATE':
-			return I18N::translate('Date of immigration');
-		case 'IMMI:PLAC':
-			return I18N::translate('Place of immigration');
-		case 'INDI':
-			return
-				/* I18N: gedcom tag INDI */
-				I18N::translate('Individual');
-		case 'INFL':
-			return
-				/* I18N: gedcom tag INFL */
-				I18N::translate('Infant');
-		case 'LANG':
-			return
-				/* I18N: gedcom tag LANG */
-				I18N::translate('Language');
-		case 'LATI':
-			return
-				/* I18N: gedcom tag LATI */
-				I18N::translate('Latitude');
-		case 'LEGA':
-			return
-				/* I18N: gedcom tag LEGA */
-				I18N::translate('Legatee');
-		case 'LONG':
-			return
-				/* I18N: gedcom tag LONG */
-				I18N::translate('Longitude');
-		case 'MAP':
-			return
-				/* I18N: gedcom tag MAP */
-				I18N::translate('Map');
-		case 'MARB':
-			return
-				/* I18N: gedcom tag MARB */
-				I18N::translate('Marriage banns');
-		case 'MARB:DATE':
-			return I18N::translate('Date of marriage banns');
-		case 'MARB:PLAC':
-			return I18N::translate('Place of marriage banns');
-		case 'MARC':
-			return
-				/* I18N: gedcom tag MARC */
-				I18N::translate('Marriage contract');
-		case 'MARL':
-			return
-				/* I18N: gedcom tag MARL */
-				I18N::translate('Marriage license');
-		case 'MARR':
-			return
-				/* I18N: gedcom tag MARR */
-				I18N::translate('Marriage');
-		case 'MARR:DATE':
-			return I18N::translate('Date of marriage');
-		case 'MARR:PLAC':
-			return I18N::translate('Place of marriage');
-		case 'MARR_CIVIL':
-			return I18N::translate('Civil marriage');
-		case 'MARR_PARTNERS':
-			return I18N::translate('Registered partnership');
-		case 'MARR_RELIGIOUS':
-			return I18N::translate('Religious marriage');
-		case 'MARR_UNKNOWN':
-			return I18N::translate('Marriage type unknown');
-		case 'MARS':
-			return
-				/* I18N: gedcom tag MARS */
-				I18N::translate('Marriage settlement');
-		case 'MEDI':
-			return
-				/* I18N: gedcom tag MEDI */
-				I18N::translate('Media type');
-		case 'NAME':
-			if ($record instanceof Repository) {
-				return
-					/* I18N: gedcom tag REPO:NAME */
-					I18N::translateContext('Repository', 'Name');
-			} else {
-				return
-					/* I18N: gedcom tag NAME */
-					I18N::translate('Name');
-			}
-		case 'NAME:FONE':
-			return I18N::translate('Phonetic name');
-		case 'NAME:_HEB':
-			return I18N::translate('Name in Hebrew');
-		case 'NATI':
-			return
-				/* I18N: gedcom tag NATI */
-				I18N::translate('Nationality');
-		case 'NATU':
-			return
-				/* I18N: gedcom tag NATU */
-				I18N::translate('Naturalization');
-		case 'NATU:DATE':
-			return I18N::translate('Date of naturalization');
-		case 'NATU:PLAC':
-			return I18N::translate('Place of naturalization');
-		case 'NCHI':
-			return
-				/* I18N: gedcom tag NCHI */
-				I18N::translate('Number of children');
-		case 'NICK':
-			return
-				/* I18N: gedcom tag NICK */
-				I18N::translate('Nickname');
-		case 'NMR':
-			return
-				/* I18N: gedcom tag NMR */
-				I18N::translate('Number of marriages');
-		case 'NOTE':
-			return
-				/* I18N: gedcom tag NOTE */
-				I18N::translate('Note');
-		case 'NPFX':
-			return
-				/* I18N: gedcom tag NPFX */
-				I18N::translate('Name prefix');
-		case 'NSFX':
-			return
-				/* I18N: gedcom tag NSFX */
-				I18N::translate('Name suffix');
-		case 'OBJE':
-			return
-				/* I18N: gedcom tag OBJE */
-				I18N::translate('Media object');
-		case 'OCCU':
-			return
-				/* I18N: gedcom tag OCCU */
-				I18N::translate('Occupation');
-		case 'OCCU:AGNC':
-			return I18N::translate('Employer');
-		case 'ORDI':
-			return
-				/* I18N: gedcom tag ORDI */
-				I18N::translate('Ordinance');
-		case 'ORDN':
-			return
-				/* I18N: gedcom tag ORDN */
-				I18N::translate('Ordination');
-		case 'ORDN:AGNC':
-			return I18N::translate('Religious institution');
-		case 'ORDN:DATE':
-			return I18N::translate('Date of ordination');
-		case 'ORDN:PLAC':
-			return I18N::translate('Place of ordination');
-		case 'PAGE':
-			return
-				/* I18N: gedcom tag PAGE */
-				I18N::translate('Citation details');
-		case 'PEDI':
-			return
-				/* I18N: gedcom tag PEDI */
-				I18N::translate('Relationship to parents');
-		case 'PHON':
-			return
-				/* I18N: gedcom tag PHON */
-				I18N::translate('Phone');
-		case 'PLAC':
-			return
-				/* I18N: gedcom tag PLAC */
-				I18N::translate('Place');
-		case 'PLAC:FONE':
-			return I18N::translate('Phonetic place');
-		case 'PLAC:ROMN':
-			return I18N::translate('Romanized place');
-		case 'PLAC:_HEB':
-			return I18N::translate('Place in Hebrew');
-		case 'POST':
-			return
-				/* I18N: gedcom tag POST */
-				I18N::translate('Postal code');
-		case 'PROB':
-			return
-				/* I18N: gedcom tag PROB */
-				I18N::translate('Probate');
-		case 'PROP':
-			return
-				/* I18N: gedcom tag PROP */
-				I18N::translate('Property');
-		case 'PUBL':
-			return
-				/* I18N: gedcom tag PUBL */
-				I18N::translate('Publication');
-		case 'QUAY':
-			return
-				/* I18N: gedcom tag QUAY */
-				I18N::translate('Quality of data');
-		case 'REFN':
-			return
-				/* I18N: gedcom tag REFN */
-				I18N::translate('Reference number');
-		case 'RELA':
-			return
-				/* I18N: gedcom tag RELA */
-				I18N::translate('Relationship');
-		case 'RELI':
-			return
-				/* I18N: gedcom tag RELI */
-				I18N::translate('Religion');
-		case 'REPO':
-			return
-				/* I18N: gedcom tag REPO */
-				I18N::translate('Repository');
-		case 'RESI':
-			return
-				/* I18N: gedcom tag RESI */
-				I18N::translate('Residence');
-		case 'RESI:DATE':
-			return I18N::translate('Date of residence');
-		case 'RESI:PLAC':
-			return I18N::translate('Place of residence');
-		case 'RESN':
-			return
-				/* I18N: gedcom tag RESN */
-				I18N::translate('Restriction');
-		case 'RETI':
-			return
-				/* I18N: gedcom tag RETI */
-				I18N::translate('Retirement');
-		case 'RETI:AGNC':
-			return I18N::translate('Employer');
-		case 'RFN':
-			return
-				/* I18N: gedcom tag RFN */
-				I18N::translate('Record file number');
-		case 'RIN':
-			return
-				/* I18N: gedcom tag RIN */
-				I18N::translate('Record ID number');
-		case 'ROLE':
-			return
-				/* I18N: gedcom tag ROLE */
-				I18N::translate('Role');
-		case 'ROMN':
-			return
-				/* I18N: gedcom tag ROMN */
-				I18N::translate('Romanized');
-		case 'SERV':
-			return
-				/* I18N: gedcom tag SERV */
-				I18N::translate('Remote server');
-		case 'SEX':
-			return
-				/* I18N: gedcom tag SEX */
-				I18N::translate('Gender');
-		case 'SHARED_NOTE':
-			return I18N::translate('Shared note');
-		case 'SLGC':
-			return
-				/* I18N: gedcom tag SLGC. LDS = Church of Latter Day Saints. */
-				I18N::translate('LDS child sealing');
-		case 'SLGC:DATE':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS child sealing');
-		case 'SLGC:PLAC':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS child sealing');
-		case 'SLGS':
-			return
-				/* I18N: gedcom tag SLGS. LDS = Church of Latter Day Saints. */
-				I18N::translate('LDS spouse sealing');
-		case 'SOUR':
-			return
-				/* I18N: gedcom tag SOUR */
-				I18N::translate('Source');
-		case 'SPFX':
-			return
-				/* I18N: gedcom tag SPFX */
-				I18N::translate('Surname prefix');
-		case 'SSN':
-			return
-				/* I18N: gedcom tag SSN */
-				I18N::translate('Social security number');
-		case 'STAE':
-			return
-				/* I18N: gedcom tag STAE */
-				I18N::translate('State');
-		case 'STAT':
-			return
-				/* I18N: gedcom tag STAT */
-				I18N::translate('Status');
-		case 'STAT:DATE':
-			return I18N::translate('Status change date');
-		case 'SUBM':
-			return
-				/* I18N: gedcom tag SUBM */
-				I18N::translate('Submitter');
-		case 'SUBN':
-			return
-				/* I18N: gedcom tag SUBN */
-				I18N::translate('Submission');
-		case 'SURN':
-			return
-				/* I18N: gedcom tag SURN */
-				I18N::translate('Surname');
-		case 'TEMP':
-			return
-				/* I18N: gedcom tag TEMP */
-				I18N::translate('Temple');
-		case 'TEXT':
-			return
-				/* I18N: gedcom tag TEXT */
-				I18N::translate('Text');
-		case 'TIME':
-			return
-				/* I18N: gedcom tag TIME */
-				I18N::translate('Time');
-		case 'TITL':
-			return
-				/* I18N: gedcom tag TITL */
-				I18N::translate('Title');
-		case 'TITL:FONE':
-			return I18N::translate('Phonetic title');
-		case 'TITL:ROMN':
-			return I18N::translate('Romanized title');
-		case 'TITL:_HEB':
-			return I18N::translate('Title in Hebrew');
-		case 'TRLR':
-			return
-				/* I18N: gedcom tag TRLR */
-				I18N::translate('Trailer');
-		case 'TYPE':
-			return
-				/* I18N: gedcom tag TYPE */
-				I18N::translate('Type');
-		case 'URL':
-			return
-				/* I18N: gedcom tag URL (A web address / URL) */
-				I18N::translate('URL');
-		case 'VERS':
-			return
-				/* I18N: gedcom tag VERS */
-				I18N::translate('Version');
-		case 'WIFE':
-			return
-				/* I18N: gedcom tag WIFE */
-				I18N::translate('Wife');
-		case 'WILL':
-			return
-				/* I18N: gedcom tag WILL */
-				I18N::translate('Will');
-		case 'WWW':
-			return
-				/* I18N: gedcom tag WWW (A web address / URL) */
-				I18N::translate('URL');
-		case '_ADOP_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Adoption of a son');
-			case 'F':
-				return I18N::translate('Adoption of a daughter');
-			default:
-				return I18N::translate('Adoption of a child');
-			}
-		case '_ADOP_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Adoption of a grandson');
-			case 'F':
-				return I18N::translate('Adoption of a granddaughter');
-			default:
-				return I18N::translate('Adoption of a grandchild');
-			}
-		case '_ADOP_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Adoption of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Adoption of a granddaughter');
-			default:
-				return I18N::translate('Adoption of a grandchild');
-			}
-		case '_ADOP_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Adoption of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Adoption of a granddaughter');
-			default:
-				return I18N::translate('Adoption of a grandchild');
-			}
-		case '_ADOP_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Adoption of a half-brother');
-			case 'F':
-				return I18N::translate('Adoption of a half-sister');
-			default:
-				return I18N::translate('Adoption of a half-sibling');
-			}
-		case '_ADOP_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Adoption of a brother');
-			case 'F':
-				return I18N::translate('Adoption of a sister');
-			default:
-				return I18N::translate('Adoption of a sibling');
-			}
-		case '_ADPF':
-			switch ($sex) {
-			case 'M':
-				return
-					/* I18N: gedcom tag _ADPF */
-					I18N::translateContext('MALE', 'Adopted by father');
-			case 'F':
-				return
-					/* I18N: gedcom tag _ADPF */
-					I18N::translateContext('FEMALE', 'Adopted by father');
-			default:
-				return
-					/* I18N: gedcom tag _ADPF */
-					I18N::translate('Adopted by father');
-			}
-		case '_ADPM':
-			switch ($sex) {
-			case 'M':
-				return
-					/* I18N: gedcom tag _ADPM */
-					I18N::translateContext('MALE', 'Adopted by mother');
-			case 'F':
-				return
-					/* I18N: gedcom tag _ADPM */
-					I18N::translateContext('FEMALE', 'Adopted by mother');
-			default:
-				return
-					/* I18N: gedcom tag _ADPM */
-					I18N::translate('Adopted by mother');
-			}
-		case '_AKA':
-		case '_AKAN':
-			switch ($sex) {
-			case 'M':
-				return
-					/* I18N: gedcom tag _AKA */
-					I18N::translateContext('MALE', 'Also known as');
-			case 'F':
-				return
-					/* I18N: gedcom tag _AKA */
-					I18N::translateContext('FEMALE', 'Also known as');
-			default:
-				return
-					/* I18N: gedcom tag _AKA */
-					I18N::translate('Also known as');
-			}
-		case '_ASSO':
-			return
-				/* I18N: gedcom tag _ASSO */
-				I18N::translate('Associate'); /* see also ASSO */
-		case '_BAPM_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Baptism of a son');
-			case 'F':
-				return I18N::translate('Baptism of a daughter');
-			default:
-				return I18N::translate('Baptism of a child');
-			}
-		case '_BAPM_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Baptism of a grandson');
-			case 'F':
-				return I18N::translate('Baptism of a granddaughter');
-			default:
-				return I18N::translate('Baptism of a grandchild');
-			}
-		case '_BAPM_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Baptism of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Baptism of a granddaughter');
-			default:
-				return I18N::translate('Baptism of a grandchild');
-			}
-		case '_BAPM_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Baptism of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Baptism of a granddaughter');
-			default:
-				return I18N::translate('Baptism of a grandchild');
-			}
-		case '_BAPM_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Baptism of a half-brother');
-			case 'F':
-				return I18N::translate('Baptism of a half-sister');
-			default:
-				return I18N::translate('Baptism of a half-sibling');
-			}
-		case '_BAPM_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Baptism of a brother');
-			case 'F':
-				return I18N::translate('Baptism of a sister');
-			default:
-				return I18N::translate('Baptism of a sibling');
-			}
-		case '_BIBL':
-			return
-				/* I18N: gedcom tag _BIBL */
-				I18N::translate('Bibliography');
-		case '_BIRT_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Birth of a son');
-			case 'F':
-				return I18N::translate('Birth of a daughter');
-			default:
-				return I18N::translate('Birth of a child');
-			}
-		case '_BIRT_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Birth of a grandson');
-			case 'F':
-				return I18N::translate('Birth of a granddaughter');
-			default:
-				return I18N::translate('Birth of a grandchild');
-			}
-		case '_BIRT_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Birth of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Birth of a granddaughter');
-			default:
-				return I18N::translate('Birth of a grandchild');
-			}
-		case '_BIRT_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Birth of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Birth of a granddaughter');
-			default:
-				return I18N::translate('Birth of a grandchild');
-			}
-		case '_BIRT_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Birth of a half-brother');
-			case 'F':
-				return I18N::translate('Birth of a half-sister');
-			default:
-				return I18N::translate('Birth of a half-sibling');
-			}
-		case '_BIRT_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Birth of a brother');
-			case 'F':
-				return I18N::translate('Birth of a sister');
-			default:
-				return I18N::translate('Birth of a sibling');
-			}
-		case '_BRTM':
-			return
-				/* I18N: gedcom tag _BRTM */
-				I18N::translate('Brit milah');
-		case '_BRTM:DATE':
-			return I18N::translate('Date of brit milah');
-		case '_BRTM:PLAC':
-			return I18N::translate('Place of brit milah');
-		case '_BURI_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a son');
-			case 'F':
-				return I18N::translate('Burial of a daughter');
-			default:
-				return I18N::translate('Burial of a child');
-			}
-		case '_BURI_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a grandson');
-			case 'F':
-				return I18N::translate('Burial of a granddaughter');
-			default:
-				return I18N::translate('Burial of a grandchild');
-			}
-		case '_BURI_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Burial of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Burial of a granddaughter');
-			default:
-				return I18N::translate('Burial of a grandchild');
-			}
-		case '_BURI_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Burial of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Burial of a granddaughter');
-			default:
-				return I18N::translate('Burial of a grandchild');
-			}
-		case '_BURI_GPAR':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a grandfather');
-			case 'F':
-				return I18N::translate('Burial of a grandmother');
-			default:
-				return I18N::translate('Burial of a grandparent');
-			}
-		case '_BURI_GPA1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a paternal grandfather');
-			case 'F':
-				return I18N::translate('Burial of a paternal grandmother');
-			default:
-				return I18N::translate('Burial of a paternal grandparent');
-			}
-		case '_BURI_GPA2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a maternal grandfather');
-			case 'F':
-				return I18N::translate('Burial of a maternal grandmother');
-			default:
-				return I18N::translate('Burial of a maternal grandparent');
-			}
-		case '_BURI_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a half-brother');
-			case 'F':
-				return I18N::translate('Burial of a half-sister');
-			default:
-				return I18N::translate('Burial of a half-sibling');
-			}
-		case '_BURI_PARE':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a father');
-			case 'F':
-				return I18N::translate('Burial of a mother');
-			default:
-				return I18N::translate('Burial of a parent');
-			}
-		case '_BURI_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a brother');
-			case 'F':
-				return I18N::translate('Burial of a sister');
-			default:
-				return I18N::translate('Burial of a sibling');
-			}
-		case '_BURI_SPOU':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a husband');
-			case 'F':
-				return I18N::translate('Burial of a wife');
-			default:
-				return I18N::translate('Burial of a spouse');
-			}
-		case '_CHR_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Christening of a son');
-			case 'F':
-				return I18N::translate('Christening of a daughter');
-			default:
-				return I18N::translate('Christening of a child');
-			}
-		case '_CHR_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Christening of a grandson');
-			case 'F':
-				return I18N::translate('Christening of a granddaughter');
-			default:
-				return I18N::translate('Christening of a grandchild');
-			}
-		case '_CHR_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Christening of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Christening of a granddaughter');
-			default:
-				return I18N::translate('Christening of a grandchild');
-			}
-		case '_CHR_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Christening of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Christening of a granddaughter');
-			default:
-				return I18N::translate('Christening of a grandchild');
-			}
-		case '_CHR_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Christening of a half-brother');
-			case 'F':
-				return I18N::translate('Christening of a half-sister');
-			default:
-				return I18N::translate('Christening of a half-sibling');
-			}
-		case '_CHR_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Christening of a brother');
-			case 'F':
-				return I18N::translate('Christening of a sister');
-			default:
-				return I18N::translate('Christening of a sibling');
-			}
-		case '_COML':
-			return
-				/* I18N: gedcom tag _COML */
-				I18N::translate('Common law marriage');
-		case '_CREM_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a son');
-			case 'F':
-				return I18N::translate('Cremation of a daughter');
-			default:
-				return I18N::translate('Cremation of a child');
-			}
-		case '_CREM_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a grandson');
-			case 'F':
-				return I18N::translate('Cremation of a granddaughter');
-			default:
-				return I18N::translate('Cremation of a grandchild');
-			}
-		case '_CREM_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Cremation of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Cremation of a granddaughter');
-			default:
-				return I18N::translate('Cremation of a grandchild');
-			}
-		case '_CREM_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Cremation of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Cremation of a granddaughter');
-			default:
-				return I18N::translate('Cremation of a grandchild');
-			}
-		case '_CREM_GPAR':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a grandfather');
-			case 'F':
-				return I18N::translate('Cremation of a grandmother');
-			default:
-				return I18N::translate('Cremation of a grand-parent');
-			}
-		case '_CREM_GPA1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a paternal grandfather');
-			case 'F':
-				return I18N::translate('Cremation of a paternal grandmother');
-			default:
-				return I18N::translate('Cremation of a grand-parent');
-			}
-		case '_CREM_GPA2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a maternal grandfather');
-			case 'F':
-				return I18N::translate('Cremation of a maternal grandmother');
-			default:
-				return I18N::translate('Cremation of a grand-parent');
-			}
-		case '_CREM_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a half-brother');
-			case 'F':
-				return I18N::translate('Cremation of a half-sister');
-			default:
-				return I18N::translate('Cremation of a half-sibling');
-			}
-		case '_CREM_PARE':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a father');
-			case 'F':
-				return I18N::translate('Cremation of a mother');
-			default:
-				return I18N::translate('Cremation of a parent');
-			}
-		case '_CREM_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a brother');
-			case 'F':
-				return I18N::translate('Cremation of a sister');
-			default:
-				return I18N::translate('Cremation of a sibling');
-			}
-		case '_CREM_SPOU':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a husband');
-			case 'F':
-				return I18N::translate('Cremation of a wife');
-			default:
-				return I18N::translate('Cremation of a spouse');
-			}
-		case '_DBID':
-			return
-				/* I18N: gedcom tag _DBID */
-				I18N::translate('Linked database ID');
-		case '_DEAT_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a son');
-			case 'F':
-				return I18N::translate('Death of a daughter');
-			default:
-				return I18N::translate('Death of a child');
-			}
-		case '_DEAT_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a grandson');
-			case 'F':
-				return I18N::translate('Death of a granddaughter');
-			default:
-				return I18N::translate('Death of a grandchild');
-			}
-		case '_DEAT_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Death of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Death of a granddaughter');
-			default:
-				return I18N::translate('Death of a grandchild');
-			}
-		case '_DEAT_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Death of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Death of a granddaughter');
-			default:
-				return I18N::translate('Death of a grandchild');
-			}
-		case '_DEAT_GPAR':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a grandfather');
-			case 'F':
-				return I18N::translate('Death of a grandmother');
-			default:
-				return I18N::translate('Death of a grand-parent');
-			}
-		case '_DEAT_GPA1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a paternal grandfather');
-			case 'F':
-				return I18N::translate('Death of a paternal grandmother');
-			default:
-				return I18N::translate('Death of a grand-parent');
-			}
-		case '_DEAT_GPA2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a maternal grandfather');
-			case 'F':
-				return I18N::translate('Death of a maternal grandmother');
-			default:
-				return I18N::translate('Death of a grand-parent');
-			}
-		case '_DEAT_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a half-brother');
-			case 'F':
-				return I18N::translate('Death of a half-sister');
-			default:
-				return I18N::translate('Death of a half-sibling');
-			}
-		case '_DEAT_PARE':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a father');
-			case 'F':
-				return I18N::translate('Death of a mother');
-			default:
-				return I18N::translate('Death of a parent');
-			}
-		case '_DEAT_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a brother');
-			case 'F':
-				return I18N::translate('Death of a sister');
-			default:
-				return I18N::translate('Death of a sibling');
-			}
-		case '_DEAT_SPOU':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a husband');
-			case 'F':
-				return I18N::translate('Death of a wife');
-			default:
-				return I18N::translate('Death of a spouse');
-			}
-		case '_DEG':
-			return
-				/* I18N: gedcom tag _DEG */
-				I18N::translate('Degree');
-		case '_DETS':
-			return
-				/* I18N: gedcom tag _DETS */
-				I18N::translate('Death of one spouse');
-		case '_DNA':
-			return
-				/* I18N: gedcom tag _DNA (from FTM 2010) */
-				I18N::translate('DNA markers');
-		case '_EMAIL':
-			return
-				/* I18N: gedcom tag _EMAIL */
-				I18N::translate('Email address');
-		case '_EYEC':
-			return
-				/* I18N: gedcom tag _EYEC */
-				I18N::translate('Eye color');
-		case '_FA1':
-			return I18N::translate('Fact 1');
-		case '_FA2':
-			return I18N::translate('Fact 2');
-		case '_FA3':
-			return I18N::translate('Fact 3');
-		case '_FA4':
-			return I18N::translate('Fact 4');
-		case '_FA5':
-			return I18N::translate('Fact 5');
-		case '_FA6':
-			return I18N::translate('Fact 6');
-		case '_FA7':
-			return I18N::translate('Fact 7');
-		case '_FA8':
-			return I18N::translate('Fact 8');
-		case '_FA9':
-			return I18N::translate('Fact 9');
-		case '_FA10':
-			return I18N::translate('Fact 10');
-		case '_FA11':
-			return I18N::translate('Fact 11');
-		case '_FA12':
-			return I18N::translate('Fact 12');
-		case '_FA13':
-			return I18N::translate('Fact 13');
-		case '_FNRL':
-			return
-				/* I18N: gedcom tag _FNRL */
-				I18N::translate('Funeral');
-		case '_FREL':
-			return
-				/* I18N: gedcom tag _FREL */
-				I18N::translate('Relationship to father');
-		case '_GEDF':
-			return
-				/* I18N: gedcom tag _GEDF */
-				I18N::translate('GEDCOM file');
-		case '_GODP':
-			return
-				/* I18N: gedcom tag _GODP */
-				I18N::translate('Godparent');
-		case '_HAIR':
-			return
-				/* I18N: gedcom tag _HAIR */
-				I18N::translate('Hair color');
-		case '_HEB':
-			return
-				/* I18N: gedcom tag _HEB */
-				I18N::translate('Hebrew');
-		case '_HEIG':
-			return
-				/* I18N: gedcom tag _HEIG */
-				I18N::translate('Height');
-		case '_HNM':
-			return
-				/* I18N: gedcom tag _HNM */
-				I18N::translate('Hebrew name');
-		case '_HOL':
-			return
-				/* I18N: gedcom tag _HOL */
-				I18N::translate('Holocaust');
-		case '_INTE':
-			switch ($sex) {
-			case 'M':
-				return
-					/* I18N: gedcom tag _INTE */
-					I18N::translateContext('MALE', 'Interred');
-			case 'F':
-				return
-					/* I18N: gedcom tag _INTE */
-					I18N::translateContext('FEMALE', 'Interred');
-			default:
-				return
-					/* I18N: gedcom tag _INTE */
-					I18N::translate('Interred');
-			}
-		case '_LOC':
-			return
-				/* I18N: gedcom tag _LOC */
-				I18N::translate('Location');
-		case '_MARI':
-			return
-				/* I18N: gedcom tag _MARI */
-				I18N::translate('Marriage intention');
-		case '_MARNM':
-			return
-				/* I18N: gedcom tag _MARNM */
-				I18N::translate('Married name');
-		case '_PRIM':
-			return
-				/* I18N: gedcom tag _PRIM */
-				I18N::translate('Highlighted image');
-		case '_MARNM_SURN':
-			return I18N::translate('Married surname');
-		case '_MARR_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Marriage of a son');
-			case 'F':
-				return I18N::translate('Marriage of a daughter');
-			default:
-				return I18N::translate('Marriage of a child');
-			}
-		case '_MARR_FAMC':
-			return
-				/* I18N: ...to each other */
-				I18N::translate('Marriage of parents');
-		case '_MARR_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Marriage of a grandson');
-			case 'F':
-				return I18N::translate('Marriage of a granddaughter');
-			default:
-				return I18N::translate('Marriage of a grandchild');
-			}
-		case '_MARR_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Marriage of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Marriage of a granddaughter');
-			default:
-				return I18N::translate('Marriage of a grandchild');
-			}
-		case '_MARR_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Marriage of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Marriage of a granddaughter');
-			default:
-				return I18N::translate('Marriage of a grandchild');
-			}
-		case '_MARR_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Marriage of a half-brother');
-			case 'F':
-				return I18N::translate('Marriage of a half-sister');
-			default:
-				return I18N::translate('Marriage of a half-sibling');
-			}
-		case '_MARR_PARE':
-			switch ($sex) {
-			case 'M':
-				return
-					/* I18N: ...to another spouse */
-					I18N::translate('Marriage of a father');
-			case 'F':
-				return
-					/* I18N: ...to another spouse */
-					I18N::translate('Marriage of a mother');
-			default:
-				return
-					/* I18N: ...to another spouse */
-					I18N::translate('Marriage of a parent');
-			}
-		case '_MARR_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Marriage of a brother');
-			case 'F':
-				return I18N::translate('Marriage of a sister');
-			default:
-				return I18N::translate('Marriage of a sibling');
-			}
-		case '_MBON':
-			return
-				/* I18N: gedcom tag _MBON */
-				I18N::translate('Marriage bond');
-		case '_MDCL':
-			return
-				/* I18N: gedcom tag _MDCL */
-				I18N::translate('Medical');
-		case '_MEDC':
-			return
-				/* I18N: gedcom tag _MEDC */
-				I18N::translate('Medical condition');
-		case '_MEND':
-			return
-				/* I18N: gedcom tag _MEND */
-				I18N::translate('Marriage ending status');
-		case '_MILI':
-			return
-				/* I18N: gedcom tag _MILI */
-				I18N::translate('Military');
-		case '_MILT':
-			return
-				/* I18N: gedcom tag _MILT */
-				I18N::translate('Military service');
-		case '_MREL':
-			return
-				/* I18N: gedcom tag _MREL */
-				I18N::translate('Relationship to mother');
-		case '_MSTAT':
-			return
-				/* I18N: gedcom tag _MSTAT */
-				I18N::translate('Marriage beginning status');
-		case '_NAME':
-			return
-				/* I18N: gedcom tag _NAME */
-				I18N::translate('Mailing name');
-		case '_NAMS':
-			return
-				/* I18N: gedcom tag _NAMS */
-				I18N::translate('Namesake');
-		case '_NLIV':
-			return
-				/* I18N: gedcom tag _NLIV */
-				I18N::translate('Not living');
-		case '_NMAR':
-			switch ($sex) {
-			case 'M':
-				return
-					/* I18N: gedcom tag _NMAR */
-					I18N::translateContext('MALE', 'Never married');
-			case 'F':
-				return
-					/* I18N: gedcom tag _NMAR */
-					I18N::translateContext('FEMALE', 'Never married');
-			default:
-				return
-					/* I18N: gedcom tag _NMAR */
-					I18N::translate('Never married');
-			}
-		case '_NMR':
-			switch ($sex) {
-			case 'M':
-				return
-					/* I18N: gedcom tag _NMR */
-					I18N::translateContext('MALE', 'Not married');
-			case 'F':
-				return
-					/* I18N: gedcom tag _NMR */
-					I18N::translateContext('FEMALE', 'Not married');
-			default:
-				return
-					/* I18N: gedcom tag _NMR */
-					I18N::translate('Not married');
-			}
-		case '_WT_USER':
-			return I18N::translate('by');
-		case '_PRMN':
-			return
-				/* I18N: gedcom tag _PRMN */
-				I18N::translate('Permanent number');
-		case '_SCBK':
-			return
-				/* I18N: gedcom tag _SCBK */
-				I18N::translate('Scrapbook');
-		case '_SEPR':
-			return
-				/* I18N: gedcom tag _SEPR */
-				I18N::translate('Separated');
-		case '_SSHOW':
-			return
-				/* I18N: gedcom tag _SSHOW */
-				I18N::translate('Slide show');
-		case '_STAT':
-			return
-				/* I18N: gedcom tag _STAT */
-				I18N::translate('Marriage status');
-		case '_SUBQ':
-			return
-				/* I18N: gedcom tag _SUBQ */
-				I18N::translate('Short version');
-		case '_TODO':
-			return
-				/* I18N: gedcom tag _TODO */
-				I18N::translate('Research task');
-		case '_TYPE':
-			return
-				/* I18N: gedcom tag _TYPE */
-				I18N::translate('Media type');
-		case '_UID':
-			return
-				/* I18N: gedcom tag _UID */
-				I18N::translate('Unique identifier');
-		case '_URL':
-			return
-				/* I18N: gedcom tag _URL */
-				I18N::translate('URL');
-		case '_WEIG':
-			return
-				/* I18N: gedcom tag _WEIG */
-				I18N::translate('Weight');
-		case '_WITN':
-			return
-				/* I18N: gedcom tag _WITN */
-				I18N::translate('Witness');
-		case '_WT_OBJE_SORT':
-			return
-				/* I18N: gedcom tag _WT_OBJE_SORT */
-				I18N::translate('Re-order media');
-		case '_YART':
-			return /* I18N: gedcom tag _YART - A yahrzeit is a special anniversary of death in the Hebrew faith/calendar. */ I18N::translate('Yahrzeit');
-			// Brit milah applies only to males, no need for male/female translations
-		case '__BRTM_CHIL':
-			return I18N::translate('Brit milah of a son');
-		case '__BRTM_GCHI':
-			return I18N::translate('Brit milah of a grandson');
-		case '__BRTM_GCH1':
-			return I18N::translateContext('daughter’s son', 'Brit milah of a grandson');
-		case '__BRTM_GCH2':
-			return I18N::translateContext('son’s son', 'Brit milah of a grandson');
-		case '__BRTM_HSIB':
-			return I18N::translate('Brit milah of a half-brother');
-		case '__BRTM_SIBL':
-			return I18N::translate('Brit milah of a brother');
-			// These "pseudo" tags are generated internally to present information about a media object
-		case '__FILE_SIZE__':
-			return I18N::translate('File size');
-		case '__IMAGE_SIZE__':
-			return I18N::translate('Image dimensions');
-		default:
-			// If no specialisation exists (e.g. DEAT:CAUS), then look for the general (CAUS)
-			if (strpos($tag, ':')) {
-				list(, $tag) = explode(':', $tag, 2);
+        switch ($tag) {
+        case 'ABBR':
+            return
+                /* I18N: gedcom tag ABBR */
+                I18N::translate('Abbreviation');
+        case 'ADDR':
+            return
+                /* I18N: gedcom tag ADDR */
+                I18N::translate('Address');
+        case 'ADR1':
+            return I18N::translate('Address line 1');
+        case 'ADR2':
+            return I18N::translate('Address line 2');
+        case 'ADOP':
+            return
+                /* I18N: gedcom tag ADOP */
+                I18N::translate('Adoption');
+        case 'ADOP:DATE':
+            return I18N::translate('Date of adoption');
+        case 'ADOP:PLAC':
+            return I18N::translate('Place of adoption');
+        case 'AFN':
+            return
+                /* I18N: gedcom tag AFN */
+                I18N::translate('Ancestral file number');
+        case 'AGE':
+            return
+                /* I18N: gedcom tag AGE */
+                I18N::translate('Age');
+        case 'AGNC':
+            return
+                /* I18N: gedcom tag AGNC */
+                I18N::translate('Agency');
+        case 'ALIA':
+            return
+                /* I18N: gedcom tag ALIA */
+                I18N::translate('Alias');
+        case 'ANCE':
+            return
+                /* I18N: gedcom tag ANCE */
+                I18N::translate('Generations of ancestors');
+        case 'ANCI':
+            return
+                /* I18N: gedcom tag ANCI */
+                I18N::translate('Ancestors interest');
+        case 'ANUL':
+            return
+                /* I18N: gedcom tag ANUL */
+                I18N::translate('Annulment');
+        case 'ASSO':
+            return
+                /* I18N: gedcom tag ASSO */
+                I18N::translate('Associate'); /* see also _ASSO */
+        case 'AUTH':
+            return
+                /* I18N: gedcom tag AUTH */
+                I18N::translate('Author');
+        case 'BAPL':
+            return
+                /* I18N: gedcom tag BAPL. LDS = Church of Latter Day Saints. */
+                I18N::translate('LDS baptism');
+        case 'BAPL:DATE':
+            return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS baptism');
+        case 'BAPL:PLAC':
+            return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS baptism');
+        case 'BAPM':
+            return
+                /* I18N: gedcom tag BAPM */
+                I18N::translate('Baptism');
+        case 'BAPM:DATE':
+            return I18N::translate('Date of baptism');
+        case 'BAPM:PLAC':
+            return I18N::translate('Place of baptism');
+        case 'BARM':
+            return
+                /* I18N: gedcom tag BARM */
+                I18N::translate('Bar mitzvah');
+        case 'BARM:DATE':
+            return I18N::translate('Date of bar mitzvah');
+        case 'BARM:PLAC':
+            return I18N::translate('Place of bar mitzvah');
+        case 'BASM':
+            return
+                /* I18N: gedcom tag BASM */
+                I18N::translate('Bat mitzvah');
+        case 'BASM:DATE':
+            return I18N::translate('Date of bat mitzvah');
+        case 'BASM:PLAC':
+            return I18N::translate('Place of bat mitzvah');
+        case 'BIRT':
+            return
+                /* I18N: gedcom tag BIRT */
+                I18N::translate('Birth');
+        case 'BIRT:DATE':
+            return I18N::translate('Date of birth');
+        case 'BIRT:PLAC':
+            return I18N::translate('Place of birth');
+        case 'BLES':
+            return
+                /* I18N: gedcom tag BLES */
+                I18N::translate('Blessing');
+        case 'BLES:DATE':
+            return I18N::translate('Date of blessing');
+        case 'BLES:PLAC':
+            return I18N::translate('Place of blessing');
+        case 'BLOB':
+            return
+                /* I18N: gedcom tag BLOB */
+                I18N::translate('Binary data object');
+        case 'BURI':
+            return
+                /* I18N: gedcom tag BURI */
+                I18N::translate('Burial');
+        case 'BURI:DATE':
+            return I18N::translate('Date of burial');
+        case 'BURI:PLAC':
+            return I18N::translate('Place of burial');
+        case 'CALN':
+            return
+                /* I18N: gedcom tag CALN */
+                I18N::translate('Call number');
+        case 'CAST':
+            return
+                /* I18N: gedcom tag CAST */
+                I18N::translate('Caste');
+        case 'CAUS':
+            return
+                /* I18N: gedcom tag CAUS */
+                I18N::translate('Cause');
+        case 'CEME':
+            return
+                /* I18N: gedcom tag CEME */
+                I18N::translate('Cemetery');
+        case 'CENS':
+            return
+                /* I18N: gedcom tag CENS */
+                I18N::translate('Census');
+        case 'CENS:DATE':
+            return I18N::translate('Census date');
+        case 'CENS:PLAC':
+            return I18N::translate('Census place');
+        case 'CHAN':
+            return
+                /* I18N: gedcom tag CHAN */
+                I18N::translate('Last change');
+        case 'CHAN:DATE':
+            return
+                /* I18N: gedcom tag CHAN:DATE */
+                I18N::translate('Date of last change');
+        case 'CHAN:_WT_USER':
+            return
+                /* I18N: gedcom tag CHAN:_WT_USER */
+                I18N::translate('Author of last change');
+        case 'CHAR':
+            return
+                /* I18N: gedcom tag CHAR */
+                I18N::translate('Character set');
+        case 'CHIL':
+            return
+                /* I18N: gedcom tag CHIL */
+                I18N::translate('Child');
+        case 'CHR':
+            return
+                /* I18N: gedcom tag CHR */
+                I18N::translate('Christening');
+        case 'CHR:DATE':
+            return I18N::translate('Date of christening');
+        case 'CHR:PLAC':
+            return I18N::translate('Place of christening');
+        case 'CHRA':
+            return
+                /* I18N: gedcom tag CHRA */
+                I18N::translate('Adult christening');
+        case 'CITN':
+            return
+                /* I18N: gedcom tag CITN */
+                I18N::translate('Citizenship');
+        case 'CITY':
+            return
+                /* I18N: gedcom tag CITY */
+                I18N::translate('City');
+        case 'COMM':
+            return
+                /* I18N: gedcom tag COMM */
+                I18N::translate('Comment');
+        case 'CONC':
+            return
+                /* I18N: gedcom tag CONC */
+                I18N::translate('Concatenation');
+        case 'CONT':
+            return
+                /* I18N: gedcom tag CONT */
+                I18N::translate('Continued');
+        case 'CONF':
+            return
+                /* I18N: gedcom tag CONF */
+                I18N::translate('Confirmation');
+        case 'CONF:DATE':
+            return I18N::translate('Date of confirmation');
+        case 'CONF:PLAC':
+            return I18N::translate('Place of confirmation');
+        case 'CONL':
+            return
+                /* I18N: gedcom tag CONL. LDS = Church of Latter Day Saints. */
+                I18N::translate('LDS confirmation');
+        case 'COPR':
+            return
+                /* I18N: gedcom tag COPR */
+                I18N::translate('Copyright');
+        case 'CORP':
+            return
+                /* I18N: gedcom tag CORP */
+                I18N::translate('Corporation');
+        case 'CREM':
+            return
+                /* I18N: gedcom tag CREM */
+                I18N::translate('Cremation');
+        case 'CREM:DATE':
+            return I18N::translate('Date of cremation');
+        case 'CREM:PLAC':
+            return I18N::translate('Place of cremation');
+        case 'CTRY':
+            return
+                /* I18N: gedcom tag CTRY */
+                I18N::translate('Country');
+        case 'DATA':
+            return
+                /* I18N: gedcom tag DATA */
+                I18N::translate('Data');
+        case 'DATA:DATE':
+            return I18N::translate('Date of entry in original source');
+        case 'DATE':
+            return
+                /* I18N: gedcom tag DATE */
+                I18N::translate('Date');
+        case 'DEAT':
+            return
+                /* I18N: gedcom tag DEAT */
+                I18N::translate('Death');
+        case 'DEAT:CAUS':
+            return I18N::translate('Cause of death');
+        case 'DEAT:DATE':
+            return I18N::translate('Date of death');
+        case 'DEAT:PLAC':
+            return I18N::translate('Place of death');
+        case 'DESC':
+            return
+                /* I18N: gedcom tag DESC */
+                I18N::translate('Descendants');
+        case 'DESI':
+            return
+                /* I18N: gedcom tag DESI */
+                I18N::translate('Descendants interest');
+        case 'DEST':
+            return
+                /* I18N: gedcom tag DEST */
+                I18N::translate('Destination');
+        case 'DIV':
+            return
+                /* I18N: gedcom tag DIV */
+                I18N::translate('Divorce');
+        case 'DIVF':
+            return
+                /* I18N: gedcom tag DIVF */
+                I18N::translate('Divorce filed');
+        case 'DSCR':
+            return
+                /* I18N: gedcom tag DSCR */
+                I18N::translate('Description');
+        case 'EDUC':
+            return
+                /* I18N: gedcom tag EDUC */
+                I18N::translate('Education');
+        case 'EDUC:AGNC':
+            return I18N::translate('School or college');
+        case 'EMAI':
+            return
+                /* I18N: gedcom tag EMAI */
+                I18N::translate('Email address');
+        case 'EMAIL':
+            return
+                /* I18N: gedcom tag EMAIL */
+                I18N::translate('Email address');
+        case 'EMAL':
+            return
+                /* I18N: gedcom tag EMAL */
+                I18N::translate('Email address');
+        case 'EMIG':
+            return
+                /* I18N: gedcom tag EMIG */
+                I18N::translate('Emigration');
+        case 'EMIG:DATE':
+            return I18N::translate('Date of emigration');
+        case 'EMIG:PLAC':
+            return I18N::translate('Place of emigration');
+        case 'ENDL':
+            return
+                /* I18N: gedcom tag ENDL. LDS = Church of Latter Day Saints. */
+                I18N::translate('LDS endowment');
+        case 'ENDL:DATE':
+            return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS endowment');
+        case 'ENDL:PLAC':
+            return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS endowment');
+        case 'ENGA':
+            return
+                /* I18N: gedcom tag ENGA */
+                I18N::translate('Engagement');
+        case 'ENGA:DATE':
+            return I18N::translate('Date of engagement');
+        case 'ENGA:PLAC':
+            return I18N::translate('Place of engagement');
+        case 'EVEN':
+            return
+                /* I18N: gedcom tag EVEN */
+                I18N::translate('Event');
+        case 'EVEN:DATE':
+            return I18N::translate('Date of event');
+        case 'EVEN:PLAC':
+            return I18N::translate('Place of event');
+        case 'EVEN:TYPE':
+            return I18N::translate('Type of event');
+        case 'FACT':
+            return
+                /* I18N: gedcom tag FACT */
+                I18N::translate('Fact');
+        case 'FACT:TYPE':
+            return I18N::translate('Type of fact');
+        case 'FAM':
+            return
+                /* I18N: gedcom tag FAM */
+                I18N::translate('Family');
+        case 'FAMC':
+            return
+                /* I18N: gedcom tag FAMC */
+                I18N::translate('Family as a child');
+        case 'FAMF':
+            return
+                /* I18N: gedcom tag FAMF */
+                I18N::translate('Family file');
+        case 'FAMS':
+            return
+                /* I18N: gedcom tag FAMS */
+                I18N::translate('Family as a spouse');
+        case 'FAMS:CENS:DATE':
+            return I18N::translate('Spouse census date');
+        case 'FAMS:CENS:PLAC':
+            return I18N::translate('Spouse census place');
+        case 'FAMS:DIV:DATE':
+            return I18N::translate('Date of divorce');
+        case 'FAMS:MARR:DATE':
+            return I18N::translate('Date of marriage');
+        case 'FAMS:MARR:PLAC':
+            return I18N::translate('Place of marriage');
+        case 'FAMS:NOTE':
+            return I18N::translate('Spouse note');
+        case 'FAMS:SLGS:DATE':
+            return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS spouse sealing');
+        case 'FAMS:SLGS:PLAC':
+            return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS spouse sealing');
+        case 'FAX':
+            return
+                /* I18N: gedcom tag FAX */
+                I18N::translate('Fax');
+        case 'FCOM':
+            return
+                /* I18N: gedcom tag FCOM */
+                I18N::translate('First communion');
+        case 'FCOM:DATE':
+            return I18N::translate('Date of first communion');
+        case 'FCOM:PLAC':
+            return I18N::translate('Place of first communion');
+        case 'FILE':
+            return
+                /* I18N: gedcom tag FILE */
+                I18N::translate('Filename');
+        case 'FONE':
+            return
+                /* I18N: gedcom tag FONE */
+                I18N::translate('Phonetic');
+        case 'FORM':
+            return
+                /* I18N: gedcom tag FORM */
+                I18N::translate('Format');
+        case 'GEDC':
+            return
+                /* I18N: gedcom tag GEDC */
+                I18N::translate('GEDCOM file');
+        case 'GIVN':
+            return
+                /* I18N: gedcom tag GIVN */
+                I18N::translate('Given names');
+        case 'GRAD':
+            return
+                /* I18N: gedcom tag GRAD */
+                I18N::translate('Graduation');
+        case 'HEAD':
+            return
+                /* I18N: gedcom tag HEAD */
+                I18N::translate('Header');
+        case 'HUSB':
+            return
+                /* I18N: gedcom tag HUSB */
+                I18N::translate('Husband');
+        case 'IDNO':
+            return
+                /* I18N: gedcom tag IDNO */
+                I18N::translate('Identification number');
+        case 'IMMI':
+            return
+                /* I18N: gedcom tag IMMI */
+                I18N::translate('Immigration');
+        case 'IMMI:DATE':
+            return I18N::translate('Date of immigration');
+        case 'IMMI:PLAC':
+            return I18N::translate('Place of immigration');
+        case 'INDI':
+            return
+                /* I18N: gedcom tag INDI */
+                I18N::translate('Individual');
+        case 'INFL':
+            return
+                /* I18N: gedcom tag INFL */
+                I18N::translate('Infant');
+        case 'LANG':
+            return
+                /* I18N: gedcom tag LANG */
+                I18N::translate('Language');
+        case 'LATI':
+            return
+                /* I18N: gedcom tag LATI */
+                I18N::translate('Latitude');
+        case 'LEGA':
+            return
+                /* I18N: gedcom tag LEGA */
+                I18N::translate('Legatee');
+        case 'LONG':
+            return
+                /* I18N: gedcom tag LONG */
+                I18N::translate('Longitude');
+        case 'MAP':
+            return
+                /* I18N: gedcom tag MAP */
+                I18N::translate('Map');
+        case 'MARB':
+            return
+                /* I18N: gedcom tag MARB */
+                I18N::translate('Marriage banns');
+        case 'MARB:DATE':
+            return I18N::translate('Date of marriage banns');
+        case 'MARB:PLAC':
+            return I18N::translate('Place of marriage banns');
+        case 'MARC':
+            return
+                /* I18N: gedcom tag MARC */
+                I18N::translate('Marriage contract');
+        case 'MARL':
+            return
+                /* I18N: gedcom tag MARL */
+                I18N::translate('Marriage license');
+        case 'MARR':
+            return
+                /* I18N: gedcom tag MARR */
+                I18N::translate('Marriage');
+        case 'MARR:DATE':
+            return I18N::translate('Date of marriage');
+        case 'MARR:PLAC':
+            return I18N::translate('Place of marriage');
+        case 'MARR_CIVIL':
+            return I18N::translate('Civil marriage');
+        case 'MARR_PARTNERS':
+            return I18N::translate('Registered partnership');
+        case 'MARR_RELIGIOUS':
+            return I18N::translate('Religious marriage');
+        case 'MARR_UNKNOWN':
+            return I18N::translate('Marriage type unknown');
+        case 'MARS':
+            return
+                /* I18N: gedcom tag MARS */
+                I18N::translate('Marriage settlement');
+        case 'MEDI':
+            return
+                /* I18N: gedcom tag MEDI */
+                I18N::translate('Media type');
+        case 'NAME':
+            if ($record instanceof Repository) {
+                return
+                    /* I18N: gedcom tag REPO:NAME */
+                    I18N::translateContext('Repository', 'Name');
+            } else {
+                return
+                    /* I18N: gedcom tag NAME */
+                    I18N::translate('Name');
+            }
+        case 'NAME:FONE':
+            return I18N::translate('Phonetic name');
+        case 'NAME:_HEB':
+            return I18N::translate('Name in Hebrew');
+        case 'NATI':
+            return
+                /* I18N: gedcom tag NATI */
+                I18N::translate('Nationality');
+        case 'NATU':
+            return
+                /* I18N: gedcom tag NATU */
+                I18N::translate('Naturalization');
+        case 'NATU:DATE':
+            return I18N::translate('Date of naturalization');
+        case 'NATU:PLAC':
+            return I18N::translate('Place of naturalization');
+        case 'NCHI':
+            return
+                /* I18N: gedcom tag NCHI */
+                I18N::translate('Number of children');
+        case 'NICK':
+            return
+                /* I18N: gedcom tag NICK */
+                I18N::translate('Nickname');
+        case 'NMR':
+            return
+                /* I18N: gedcom tag NMR */
+                I18N::translate('Number of marriages');
+        case 'NOTE':
+            return
+                /* I18N: gedcom tag NOTE */
+                I18N::translate('Note');
+        case 'NPFX':
+            return
+                /* I18N: gedcom tag NPFX */
+                I18N::translate('Name prefix');
+        case 'NSFX':
+            return
+                /* I18N: gedcom tag NSFX */
+                I18N::translate('Name suffix');
+        case 'OBJE':
+            return
+                /* I18N: gedcom tag OBJE */
+                I18N::translate('Media object');
+        case 'OCCU':
+            return
+                /* I18N: gedcom tag OCCU */
+                I18N::translate('Occupation');
+        case 'OCCU:AGNC':
+            return I18N::translate('Employer');
+        case 'ORDI':
+            return
+                /* I18N: gedcom tag ORDI */
+                I18N::translate('Ordinance');
+        case 'ORDN':
+            return
+                /* I18N: gedcom tag ORDN */
+                I18N::translate('Ordination');
+        case 'ORDN:AGNC':
+            return I18N::translate('Religious institution');
+        case 'ORDN:DATE':
+            return I18N::translate('Date of ordination');
+        case 'ORDN:PLAC':
+            return I18N::translate('Place of ordination');
+        case 'PAGE':
+            return
+                /* I18N: gedcom tag PAGE */
+                I18N::translate('Citation details');
+        case 'PEDI':
+            return
+                /* I18N: gedcom tag PEDI */
+                I18N::translate('Relationship to parents');
+        case 'PHON':
+            return
+                /* I18N: gedcom tag PHON */
+                I18N::translate('Phone');
+        case 'PLAC':
+            return
+                /* I18N: gedcom tag PLAC */
+                I18N::translate('Place');
+        case 'PLAC:FONE':
+            return I18N::translate('Phonetic place');
+        case 'PLAC:ROMN':
+            return I18N::translate('Romanized place');
+        case 'PLAC:_HEB':
+            return I18N::translate('Place in Hebrew');
+        case 'POST':
+            return
+                /* I18N: gedcom tag POST */
+                I18N::translate('Postal code');
+        case 'PROB':
+            return
+                /* I18N: gedcom tag PROB */
+                I18N::translate('Probate');
+        case 'PROP':
+            return
+                /* I18N: gedcom tag PROP */
+                I18N::translate('Property');
+        case 'PUBL':
+            return
+                /* I18N: gedcom tag PUBL */
+                I18N::translate('Publication');
+        case 'QUAY':
+            return
+                /* I18N: gedcom tag QUAY */
+                I18N::translate('Quality of data');
+        case 'REFN':
+            return
+                /* I18N: gedcom tag REFN */
+                I18N::translate('Reference number');
+        case 'RELA':
+            return
+                /* I18N: gedcom tag RELA */
+                I18N::translate('Relationship');
+        case 'RELI':
+            return
+                /* I18N: gedcom tag RELI */
+                I18N::translate('Religion');
+        case 'REPO':
+            return
+                /* I18N: gedcom tag REPO */
+                I18N::translate('Repository');
+        case 'RESI':
+            return
+                /* I18N: gedcom tag RESI */
+                I18N::translate('Residence');
+        case 'RESI:DATE':
+            return I18N::translate('Date of residence');
+        case 'RESI:PLAC':
+            return I18N::translate('Place of residence');
+        case 'RESN':
+            return
+                /* I18N: gedcom tag RESN */
+                I18N::translate('Restriction');
+        case 'RETI':
+            return
+                /* I18N: gedcom tag RETI */
+                I18N::translate('Retirement');
+        case 'RETI:AGNC':
+            return I18N::translate('Employer');
+        case 'RFN':
+            return
+                /* I18N: gedcom tag RFN */
+                I18N::translate('Record file number');
+        case 'RIN':
+            return
+                /* I18N: gedcom tag RIN */
+                I18N::translate('Record ID number');
+        case 'ROLE':
+            return
+                /* I18N: gedcom tag ROLE */
+                I18N::translate('Role');
+        case 'ROMN':
+            return
+                /* I18N: gedcom tag ROMN */
+                I18N::translate('Romanized');
+        case 'SERV':
+            return
+                /* I18N: gedcom tag SERV */
+                I18N::translate('Remote server');
+        case 'SEX':
+            return
+                /* I18N: gedcom tag SEX */
+                I18N::translate('Gender');
+        case 'SHARED_NOTE':
+            return I18N::translate('Shared note');
+        case 'SLGC':
+            return
+                /* I18N: gedcom tag SLGC. LDS = Church of Latter Day Saints. */
+                I18N::translate('LDS child sealing');
+        case 'SLGC:DATE':
+            return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS child sealing');
+        case 'SLGC:PLAC':
+            return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS child sealing');
+        case 'SLGS':
+            return
+                /* I18N: gedcom tag SLGS. LDS = Church of Latter Day Saints. */
+                I18N::translate('LDS spouse sealing');
+        case 'SOUR':
+            return
+                /* I18N: gedcom tag SOUR */
+                I18N::translate('Source');
+        case 'SPFX':
+            return
+                /* I18N: gedcom tag SPFX */
+                I18N::translate('Surname prefix');
+        case 'SSN':
+            return
+                /* I18N: gedcom tag SSN */
+                I18N::translate('Social security number');
+        case 'STAE':
+            return
+                /* I18N: gedcom tag STAE */
+                I18N::translate('State');
+        case 'STAT':
+            return
+                /* I18N: gedcom tag STAT */
+                I18N::translate('Status');
+        case 'STAT:DATE':
+            return I18N::translate('Status change date');
+        case 'SUBM':
+            return
+                /* I18N: gedcom tag SUBM */
+                I18N::translate('Submitter');
+        case 'SUBN':
+            return
+                /* I18N: gedcom tag SUBN */
+                I18N::translate('Submission');
+        case 'SURN':
+            return
+                /* I18N: gedcom tag SURN */
+                I18N::translate('Surname');
+        case 'TEMP':
+            return
+                /* I18N: gedcom tag TEMP */
+                I18N::translate('Temple');
+        case 'TEXT':
+            return
+                /* I18N: gedcom tag TEXT */
+                I18N::translate('Text');
+        case 'TIME':
+            return
+                /* I18N: gedcom tag TIME */
+                I18N::translate('Time');
+        case 'TITL':
+            return
+                /* I18N: gedcom tag TITL */
+                I18N::translate('Title');
+        case 'TITL:FONE':
+            return I18N::translate('Phonetic title');
+        case 'TITL:ROMN':
+            return I18N::translate('Romanized title');
+        case 'TITL:_HEB':
+            return I18N::translate('Title in Hebrew');
+        case 'TRLR':
+            return
+                /* I18N: gedcom tag TRLR */
+                I18N::translate('Trailer');
+        case 'TYPE':
+            return
+                /* I18N: gedcom tag TYPE */
+                I18N::translate('Type');
+        case 'URL':
+            return
+                /* I18N: gedcom tag URL (A web address / URL) */
+                I18N::translate('URL');
+        case 'VERS':
+            return
+                /* I18N: gedcom tag VERS */
+                I18N::translate('Version');
+        case 'WIFE':
+            return
+                /* I18N: gedcom tag WIFE */
+                I18N::translate('Wife');
+        case 'WILL':
+            return
+                /* I18N: gedcom tag WILL */
+                I18N::translate('Will');
+        case 'WWW':
+            return
+                /* I18N: gedcom tag WWW (A web address / URL) */
+                I18N::translate('URL');
+        case '_ADOP_CHIL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Adoption of a son');
+            case 'F':
+                return I18N::translate('Adoption of a daughter');
+            default:
+                return I18N::translate('Adoption of a child');
+            }
+        case '_ADOP_GCHI':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Adoption of a grandson');
+            case 'F':
+                return I18N::translate('Adoption of a granddaughter');
+            default:
+                return I18N::translate('Adoption of a grandchild');
+            }
+        case '_ADOP_GCH1':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('daughter’s son', 'Adoption of a grandson');
+            case 'F':
+                return I18N::translateContext('daughter’s daughter', 'Adoption of a granddaughter');
+            default:
+                return I18N::translate('Adoption of a grandchild');
+            }
+        case '_ADOP_GCH2':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('son’s son', 'Adoption of a grandson');
+            case 'F':
+                return I18N::translateContext('son’s daughter', 'Adoption of a granddaughter');
+            default:
+                return I18N::translate('Adoption of a grandchild');
+            }
+        case '_ADOP_HSIB':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Adoption of a half-brother');
+            case 'F':
+                return I18N::translate('Adoption of a half-sister');
+            default:
+                return I18N::translate('Adoption of a half-sibling');
+            }
+        case '_ADOP_SIBL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Adoption of a brother');
+            case 'F':
+                return I18N::translate('Adoption of a sister');
+            default:
+                return I18N::translate('Adoption of a sibling');
+            }
+        case '_ADPF':
+            switch ($sex) {
+            case 'M':
+                return
+                    /* I18N: gedcom tag _ADPF */
+                    I18N::translateContext('MALE', 'Adopted by father');
+            case 'F':
+                return
+                    /* I18N: gedcom tag _ADPF */
+                    I18N::translateContext('FEMALE', 'Adopted by father');
+            default:
+                return
+                    /* I18N: gedcom tag _ADPF */
+                    I18N::translate('Adopted by father');
+            }
+        case '_ADPM':
+            switch ($sex) {
+            case 'M':
+                return
+                    /* I18N: gedcom tag _ADPM */
+                    I18N::translateContext('MALE', 'Adopted by mother');
+            case 'F':
+                return
+                    /* I18N: gedcom tag _ADPM */
+                    I18N::translateContext('FEMALE', 'Adopted by mother');
+            default:
+                return
+                    /* I18N: gedcom tag _ADPM */
+                    I18N::translate('Adopted by mother');
+            }
+        case '_AKA':
+        case '_AKAN':
+            switch ($sex) {
+            case 'M':
+                return
+                    /* I18N: gedcom tag _AKA */
+                    I18N::translateContext('MALE', 'Also known as');
+            case 'F':
+                return
+                    /* I18N: gedcom tag _AKA */
+                    I18N::translateContext('FEMALE', 'Also known as');
+            default:
+                return
+                    /* I18N: gedcom tag _AKA */
+                    I18N::translate('Also known as');
+            }
+        case '_ASSO':
+            return
+                /* I18N: gedcom tag _ASSO */
+                I18N::translate('Associate'); /* see also ASSO */
+        case '_BAPM_CHIL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Baptism of a son');
+            case 'F':
+                return I18N::translate('Baptism of a daughter');
+            default:
+                return I18N::translate('Baptism of a child');
+            }
+        case '_BAPM_GCHI':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Baptism of a grandson');
+            case 'F':
+                return I18N::translate('Baptism of a granddaughter');
+            default:
+                return I18N::translate('Baptism of a grandchild');
+            }
+        case '_BAPM_GCH1':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('daughter’s son', 'Baptism of a grandson');
+            case 'F':
+                return I18N::translateContext('daughter’s daughter', 'Baptism of a granddaughter');
+            default:
+                return I18N::translate('Baptism of a grandchild');
+            }
+        case '_BAPM_GCH2':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('son’s son', 'Baptism of a grandson');
+            case 'F':
+                return I18N::translateContext('son’s daughter', 'Baptism of a granddaughter');
+            default:
+                return I18N::translate('Baptism of a grandchild');
+            }
+        case '_BAPM_HSIB':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Baptism of a half-brother');
+            case 'F':
+                return I18N::translate('Baptism of a half-sister');
+            default:
+                return I18N::translate('Baptism of a half-sibling');
+            }
+        case '_BAPM_SIBL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Baptism of a brother');
+            case 'F':
+                return I18N::translate('Baptism of a sister');
+            default:
+                return I18N::translate('Baptism of a sibling');
+            }
+        case '_BIBL':
+            return
+                /* I18N: gedcom tag _BIBL */
+                I18N::translate('Bibliography');
+        case '_BIRT_CHIL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Birth of a son');
+            case 'F':
+                return I18N::translate('Birth of a daughter');
+            default:
+                return I18N::translate('Birth of a child');
+            }
+        case '_BIRT_GCHI':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Birth of a grandson');
+            case 'F':
+                return I18N::translate('Birth of a granddaughter');
+            default:
+                return I18N::translate('Birth of a grandchild');
+            }
+        case '_BIRT_GCH1':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('daughter’s son', 'Birth of a grandson');
+            case 'F':
+                return I18N::translateContext('daughter’s daughter', 'Birth of a granddaughter');
+            default:
+                return I18N::translate('Birth of a grandchild');
+            }
+        case '_BIRT_GCH2':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('son’s son', 'Birth of a grandson');
+            case 'F':
+                return I18N::translateContext('son’s daughter', 'Birth of a granddaughter');
+            default:
+                return I18N::translate('Birth of a grandchild');
+            }
+        case '_BIRT_HSIB':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Birth of a half-brother');
+            case 'F':
+                return I18N::translate('Birth of a half-sister');
+            default:
+                return I18N::translate('Birth of a half-sibling');
+            }
+        case '_BIRT_SIBL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Birth of a brother');
+            case 'F':
+                return I18N::translate('Birth of a sister');
+            default:
+                return I18N::translate('Birth of a sibling');
+            }
+        case '_BRTM':
+            return
+                /* I18N: gedcom tag _BRTM */
+                I18N::translate('Brit milah');
+        case '_BRTM:DATE':
+            return I18N::translate('Date of brit milah');
+        case '_BRTM:PLAC':
+            return I18N::translate('Place of brit milah');
+        case '_BURI_CHIL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Burial of a son');
+            case 'F':
+                return I18N::translate('Burial of a daughter');
+            default:
+                return I18N::translate('Burial of a child');
+            }
+        case '_BURI_GCHI':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Burial of a grandson');
+            case 'F':
+                return I18N::translate('Burial of a granddaughter');
+            default:
+                return I18N::translate('Burial of a grandchild');
+            }
+        case '_BURI_GCH1':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('daughter’s son', 'Burial of a grandson');
+            case 'F':
+                return I18N::translateContext('daughter’s daughter', 'Burial of a granddaughter');
+            default:
+                return I18N::translate('Burial of a grandchild');
+            }
+        case '_BURI_GCH2':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('son’s son', 'Burial of a grandson');
+            case 'F':
+                return I18N::translateContext('son’s daughter', 'Burial of a granddaughter');
+            default:
+                return I18N::translate('Burial of a grandchild');
+            }
+        case '_BURI_GPAR':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Burial of a grandfather');
+            case 'F':
+                return I18N::translate('Burial of a grandmother');
+            default:
+                return I18N::translate('Burial of a grandparent');
+            }
+        case '_BURI_GPA1':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Burial of a paternal grandfather');
+            case 'F':
+                return I18N::translate('Burial of a paternal grandmother');
+            default:
+                return I18N::translate('Burial of a paternal grandparent');
+            }
+        case '_BURI_GPA2':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Burial of a maternal grandfather');
+            case 'F':
+                return I18N::translate('Burial of a maternal grandmother');
+            default:
+                return I18N::translate('Burial of a maternal grandparent');
+            }
+        case '_BURI_HSIB':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Burial of a half-brother');
+            case 'F':
+                return I18N::translate('Burial of a half-sister');
+            default:
+                return I18N::translate('Burial of a half-sibling');
+            }
+        case '_BURI_PARE':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Burial of a father');
+            case 'F':
+                return I18N::translate('Burial of a mother');
+            default:
+                return I18N::translate('Burial of a parent');
+            }
+        case '_BURI_SIBL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Burial of a brother');
+            case 'F':
+                return I18N::translate('Burial of a sister');
+            default:
+                return I18N::translate('Burial of a sibling');
+            }
+        case '_BURI_SPOU':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Burial of a husband');
+            case 'F':
+                return I18N::translate('Burial of a wife');
+            default:
+                return I18N::translate('Burial of a spouse');
+            }
+        case '_CHR_CHIL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Christening of a son');
+            case 'F':
+                return I18N::translate('Christening of a daughter');
+            default:
+                return I18N::translate('Christening of a child');
+            }
+        case '_CHR_GCHI':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Christening of a grandson');
+            case 'F':
+                return I18N::translate('Christening of a granddaughter');
+            default:
+                return I18N::translate('Christening of a grandchild');
+            }
+        case '_CHR_GCH1':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('daughter’s son', 'Christening of a grandson');
+            case 'F':
+                return I18N::translateContext('daughter’s daughter', 'Christening of a granddaughter');
+            default:
+                return I18N::translate('Christening of a grandchild');
+            }
+        case '_CHR_GCH2':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('son’s son', 'Christening of a grandson');
+            case 'F':
+                return I18N::translateContext('son’s daughter', 'Christening of a granddaughter');
+            default:
+                return I18N::translate('Christening of a grandchild');
+            }
+        case '_CHR_HSIB':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Christening of a half-brother');
+            case 'F':
+                return I18N::translate('Christening of a half-sister');
+            default:
+                return I18N::translate('Christening of a half-sibling');
+            }
+        case '_CHR_SIBL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Christening of a brother');
+            case 'F':
+                return I18N::translate('Christening of a sister');
+            default:
+                return I18N::translate('Christening of a sibling');
+            }
+        case '_COML':
+            return
+                /* I18N: gedcom tag _COML */
+                I18N::translate('Common law marriage');
+        case '_CREM_CHIL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Cremation of a son');
+            case 'F':
+                return I18N::translate('Cremation of a daughter');
+            default:
+                return I18N::translate('Cremation of a child');
+            }
+        case '_CREM_GCHI':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Cremation of a grandson');
+            case 'F':
+                return I18N::translate('Cremation of a granddaughter');
+            default:
+                return I18N::translate('Cremation of a grandchild');
+            }
+        case '_CREM_GCH1':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('daughter’s son', 'Cremation of a grandson');
+            case 'F':
+                return I18N::translateContext('daughter’s daughter', 'Cremation of a granddaughter');
+            default:
+                return I18N::translate('Cremation of a grandchild');
+            }
+        case '_CREM_GCH2':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('son’s son', 'Cremation of a grandson');
+            case 'F':
+                return I18N::translateContext('son’s daughter', 'Cremation of a granddaughter');
+            default:
+                return I18N::translate('Cremation of a grandchild');
+            }
+        case '_CREM_GPAR':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Cremation of a grandfather');
+            case 'F':
+                return I18N::translate('Cremation of a grandmother');
+            default:
+                return I18N::translate('Cremation of a grand-parent');
+            }
+        case '_CREM_GPA1':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Cremation of a paternal grandfather');
+            case 'F':
+                return I18N::translate('Cremation of a paternal grandmother');
+            default:
+                return I18N::translate('Cremation of a grand-parent');
+            }
+        case '_CREM_GPA2':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Cremation of a maternal grandfather');
+            case 'F':
+                return I18N::translate('Cremation of a maternal grandmother');
+            default:
+                return I18N::translate('Cremation of a grand-parent');
+            }
+        case '_CREM_HSIB':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Cremation of a half-brother');
+            case 'F':
+                return I18N::translate('Cremation of a half-sister');
+            default:
+                return I18N::translate('Cremation of a half-sibling');
+            }
+        case '_CREM_PARE':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Cremation of a father');
+            case 'F':
+                return I18N::translate('Cremation of a mother');
+            default:
+                return I18N::translate('Cremation of a parent');
+            }
+        case '_CREM_SIBL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Cremation of a brother');
+            case 'F':
+                return I18N::translate('Cremation of a sister');
+            default:
+                return I18N::translate('Cremation of a sibling');
+            }
+        case '_CREM_SPOU':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Cremation of a husband');
+            case 'F':
+                return I18N::translate('Cremation of a wife');
+            default:
+                return I18N::translate('Cremation of a spouse');
+            }
+        case '_DBID':
+            return
+                /* I18N: gedcom tag _DBID */
+                I18N::translate('Linked database ID');
+        case '_DEAT_CHIL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Death of a son');
+            case 'F':
+                return I18N::translate('Death of a daughter');
+            default:
+                return I18N::translate('Death of a child');
+            }
+        case '_DEAT_GCHI':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Death of a grandson');
+            case 'F':
+                return I18N::translate('Death of a granddaughter');
+            default:
+                return I18N::translate('Death of a grandchild');
+            }
+        case '_DEAT_GCH1':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('daughter’s son', 'Death of a grandson');
+            case 'F':
+                return I18N::translateContext('daughter’s daughter', 'Death of a granddaughter');
+            default:
+                return I18N::translate('Death of a grandchild');
+            }
+        case '_DEAT_GCH2':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('son’s son', 'Death of a grandson');
+            case 'F':
+                return I18N::translateContext('son’s daughter', 'Death of a granddaughter');
+            default:
+                return I18N::translate('Death of a grandchild');
+            }
+        case '_DEAT_GPAR':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Death of a grandfather');
+            case 'F':
+                return I18N::translate('Death of a grandmother');
+            default:
+                return I18N::translate('Death of a grand-parent');
+            }
+        case '_DEAT_GPA1':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Death of a paternal grandfather');
+            case 'F':
+                return I18N::translate('Death of a paternal grandmother');
+            default:
+                return I18N::translate('Death of a grand-parent');
+            }
+        case '_DEAT_GPA2':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Death of a maternal grandfather');
+            case 'F':
+                return I18N::translate('Death of a maternal grandmother');
+            default:
+                return I18N::translate('Death of a grand-parent');
+            }
+        case '_DEAT_HSIB':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Death of a half-brother');
+            case 'F':
+                return I18N::translate('Death of a half-sister');
+            default:
+                return I18N::translate('Death of a half-sibling');
+            }
+        case '_DEAT_PARE':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Death of a father');
+            case 'F':
+                return I18N::translate('Death of a mother');
+            default:
+                return I18N::translate('Death of a parent');
+            }
+        case '_DEAT_SIBL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Death of a brother');
+            case 'F':
+                return I18N::translate('Death of a sister');
+            default:
+                return I18N::translate('Death of a sibling');
+            }
+        case '_DEAT_SPOU':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Death of a husband');
+            case 'F':
+                return I18N::translate('Death of a wife');
+            default:
+                return I18N::translate('Death of a spouse');
+            }
+        case '_DEG':
+            return
+                /* I18N: gedcom tag _DEG */
+                I18N::translate('Degree');
+        case '_DETS':
+            return
+                /* I18N: gedcom tag _DETS */
+                I18N::translate('Death of one spouse');
+        case '_DNA':
+            return
+                /* I18N: gedcom tag _DNA (from FTM 2010) */
+                I18N::translate('DNA markers');
+        case '_EMAIL':
+            return
+                /* I18N: gedcom tag _EMAIL */
+                I18N::translate('Email address');
+        case '_EYEC':
+            return
+                /* I18N: gedcom tag _EYEC */
+                I18N::translate('Eye color');
+        case '_FA1':
+            return I18N::translate('Fact 1');
+        case '_FA2':
+            return I18N::translate('Fact 2');
+        case '_FA3':
+            return I18N::translate('Fact 3');
+        case '_FA4':
+            return I18N::translate('Fact 4');
+        case '_FA5':
+            return I18N::translate('Fact 5');
+        case '_FA6':
+            return I18N::translate('Fact 6');
+        case '_FA7':
+            return I18N::translate('Fact 7');
+        case '_FA8':
+            return I18N::translate('Fact 8');
+        case '_FA9':
+            return I18N::translate('Fact 9');
+        case '_FA10':
+            return I18N::translate('Fact 10');
+        case '_FA11':
+            return I18N::translate('Fact 11');
+        case '_FA12':
+            return I18N::translate('Fact 12');
+        case '_FA13':
+            return I18N::translate('Fact 13');
+        case '_FNRL':
+            return
+                /* I18N: gedcom tag _FNRL */
+                I18N::translate('Funeral');
+        case '_FREL':
+            return
+                /* I18N: gedcom tag _FREL */
+                I18N::translate('Relationship to father');
+        case '_GEDF':
+            return
+                /* I18N: gedcom tag _GEDF */
+                I18N::translate('GEDCOM file');
+        case '_GODP':
+            return
+                /* I18N: gedcom tag _GODP */
+                I18N::translate('Godparent');
+        case '_HAIR':
+            return
+                /* I18N: gedcom tag _HAIR */
+                I18N::translate('Hair color');
+        case '_HEB':
+            return
+                /* I18N: gedcom tag _HEB */
+                I18N::translate('Hebrew');
+        case '_HEIG':
+            return
+                /* I18N: gedcom tag _HEIG */
+                I18N::translate('Height');
+        case '_HNM':
+            return
+                /* I18N: gedcom tag _HNM */
+                I18N::translate('Hebrew name');
+        case '_HOL':
+            return
+                /* I18N: gedcom tag _HOL */
+                I18N::translate('Holocaust');
+        case '_INTE':
+            switch ($sex) {
+            case 'M':
+                return
+                    /* I18N: gedcom tag _INTE */
+                    I18N::translateContext('MALE', 'Interred');
+            case 'F':
+                return
+                    /* I18N: gedcom tag _INTE */
+                    I18N::translateContext('FEMALE', 'Interred');
+            default:
+                return
+                    /* I18N: gedcom tag _INTE */
+                    I18N::translate('Interred');
+            }
+        case '_LOC':
+            return
+                /* I18N: gedcom tag _LOC */
+                I18N::translate('Location');
+        case '_MARI':
+            return
+                /* I18N: gedcom tag _MARI */
+                I18N::translate('Marriage intention');
+        case '_MARNM':
+            return
+                /* I18N: gedcom tag _MARNM */
+                I18N::translate('Married name');
+        case '_PRIM':
+            return
+                /* I18N: gedcom tag _PRIM */
+                I18N::translate('Highlighted image');
+        case '_MARNM_SURN':
+            return I18N::translate('Married surname');
+        case '_MARR_CHIL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Marriage of a son');
+            case 'F':
+                return I18N::translate('Marriage of a daughter');
+            default:
+                return I18N::translate('Marriage of a child');
+            }
+        case '_MARR_FAMC':
+            return
+                /* I18N: ...to each other */
+                I18N::translate('Marriage of parents');
+        case '_MARR_GCHI':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Marriage of a grandson');
+            case 'F':
+                return I18N::translate('Marriage of a granddaughter');
+            default:
+                return I18N::translate('Marriage of a grandchild');
+            }
+        case '_MARR_GCH1':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('daughter’s son', 'Marriage of a grandson');
+            case 'F':
+                return I18N::translateContext('daughter’s daughter', 'Marriage of a granddaughter');
+            default:
+                return I18N::translate('Marriage of a grandchild');
+            }
+        case '_MARR_GCH2':
+            switch ($sex) {
+            case 'M':
+                return I18N::translateContext('son’s son', 'Marriage of a grandson');
+            case 'F':
+                return I18N::translateContext('son’s daughter', 'Marriage of a granddaughter');
+            default:
+                return I18N::translate('Marriage of a grandchild');
+            }
+        case '_MARR_HSIB':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Marriage of a half-brother');
+            case 'F':
+                return I18N::translate('Marriage of a half-sister');
+            default:
+                return I18N::translate('Marriage of a half-sibling');
+            }
+        case '_MARR_PARE':
+            switch ($sex) {
+            case 'M':
+                return
+                    /* I18N: ...to another spouse */
+                    I18N::translate('Marriage of a father');
+            case 'F':
+                return
+                    /* I18N: ...to another spouse */
+                    I18N::translate('Marriage of a mother');
+            default:
+                return
+                    /* I18N: ...to another spouse */
+                    I18N::translate('Marriage of a parent');
+            }
+        case '_MARR_SIBL':
+            switch ($sex) {
+            case 'M':
+                return I18N::translate('Marriage of a brother');
+            case 'F':
+                return I18N::translate('Marriage of a sister');
+            default:
+                return I18N::translate('Marriage of a sibling');
+            }
+        case '_MBON':
+            return
+                /* I18N: gedcom tag _MBON */
+                I18N::translate('Marriage bond');
+        case '_MDCL':
+            return
+                /* I18N: gedcom tag _MDCL */
+                I18N::translate('Medical');
+        case '_MEDC':
+            return
+                /* I18N: gedcom tag _MEDC */
+                I18N::translate('Medical condition');
+        case '_MEND':
+            return
+                /* I18N: gedcom tag _MEND */
+                I18N::translate('Marriage ending status');
+        case '_MILI':
+            return
+                /* I18N: gedcom tag _MILI */
+                I18N::translate('Military');
+        case '_MILT':
+            return
+                /* I18N: gedcom tag _MILT */
+                I18N::translate('Military service');
+        case '_MREL':
+            return
+                /* I18N: gedcom tag _MREL */
+                I18N::translate('Relationship to mother');
+        case '_MSTAT':
+            return
+                /* I18N: gedcom tag _MSTAT */
+                I18N::translate('Marriage beginning status');
+        case '_NAME':
+            return
+                /* I18N: gedcom tag _NAME */
+                I18N::translate('Mailing name');
+        case '_NAMS':
+            return
+                /* I18N: gedcom tag _NAMS */
+                I18N::translate('Namesake');
+        case '_NLIV':
+            return
+                /* I18N: gedcom tag _NLIV */
+                I18N::translate('Not living');
+        case '_NMAR':
+            switch ($sex) {
+            case 'M':
+                return
+                    /* I18N: gedcom tag _NMAR */
+                    I18N::translateContext('MALE', 'Never married');
+            case 'F':
+                return
+                    /* I18N: gedcom tag _NMAR */
+                    I18N::translateContext('FEMALE', 'Never married');
+            default:
+                return
+                    /* I18N: gedcom tag _NMAR */
+                    I18N::translate('Never married');
+            }
+        case '_NMR':
+            switch ($sex) {
+            case 'M':
+                return
+                    /* I18N: gedcom tag _NMR */
+                    I18N::translateContext('MALE', 'Not married');
+            case 'F':
+                return
+                    /* I18N: gedcom tag _NMR */
+                    I18N::translateContext('FEMALE', 'Not married');
+            default:
+                return
+                    /* I18N: gedcom tag _NMR */
+                    I18N::translate('Not married');
+            }
+        case '_WT_USER':
+            return I18N::translate('by');
+        case '_PRMN':
+            return
+                /* I18N: gedcom tag _PRMN */
+                I18N::translate('Permanent number');
+        case '_SCBK':
+            return
+                /* I18N: gedcom tag _SCBK */
+                I18N::translate('Scrapbook');
+        case '_SEPR':
+            return
+                /* I18N: gedcom tag _SEPR */
+                I18N::translate('Separated');
+        case '_SSHOW':
+            return
+                /* I18N: gedcom tag _SSHOW */
+                I18N::translate('Slide show');
+        case '_STAT':
+            return
+                /* I18N: gedcom tag _STAT */
+                I18N::translate('Marriage status');
+        case '_SUBQ':
+            return
+                /* I18N: gedcom tag _SUBQ */
+                I18N::translate('Short version');
+        case '_TODO':
+            return
+                /* I18N: gedcom tag _TODO */
+                I18N::translate('Research task');
+        case '_TYPE':
+            return
+                /* I18N: gedcom tag _TYPE */
+                I18N::translate('Media type');
+        case '_UID':
+            return
+                /* I18N: gedcom tag _UID */
+                I18N::translate('Unique identifier');
+        case '_URL':
+            return
+                /* I18N: gedcom tag _URL */
+                I18N::translate('URL');
+        case '_WEIG':
+            return
+                /* I18N: gedcom tag _WEIG */
+                I18N::translate('Weight');
+        case '_WITN':
+            return
+                /* I18N: gedcom tag _WITN */
+                I18N::translate('Witness');
+        case '_WT_OBJE_SORT':
+            return
+                /* I18N: gedcom tag _WT_OBJE_SORT */
+                I18N::translate('Re-order media');
+        case '_YART':
+            return /* I18N: gedcom tag _YART - A yahrzeit is a special anniversary of death in the Hebrew faith/calendar. */ I18N::translate('Yahrzeit');
+            // Brit milah applies only to males, no need for male/female translations
+        case '__BRTM_CHIL':
+            return I18N::translate('Brit milah of a son');
+        case '__BRTM_GCHI':
+            return I18N::translate('Brit milah of a grandson');
+        case '__BRTM_GCH1':
+            return I18N::translateContext('daughter’s son', 'Brit milah of a grandson');
+        case '__BRTM_GCH2':
+            return I18N::translateContext('son’s son', 'Brit milah of a grandson');
+        case '__BRTM_HSIB':
+            return I18N::translate('Brit milah of a half-brother');
+        case '__BRTM_SIBL':
+            return I18N::translate('Brit milah of a brother');
+            // These "pseudo" tags are generated internally to present information about a media object
+        case '__FILE_SIZE__':
+            return I18N::translate('File size');
+        case '__IMAGE_SIZE__':
+            return I18N::translate('Image dimensions');
+        default:
+            // If no specialisation exists (e.g. DEAT:CAUS), then look for the general (CAUS)
+            if (strpos($tag, ':')) {
+                list(, $tag) = explode(':', $tag, 2);
 
-				return self::getLabel($tag, $record);
-			}
+                return self::getLabel($tag, $record);
+            }
 
-			// Still no translation? Highlight this as an error
-			return '<span class="error" title="' . I18N::translate('Unrecognized GEDCOM code') . '">' . Filter::escapeHtml($tag) . '</span>';
-		}
-	}
+            // Still no translation? Highlight this as an error
+            return '<span class="error" title="' . I18N::translate('Unrecognized GEDCOM code') . '">' . Filter::escapeHtml($tag) . '</span>';
+        }
+    }
 
-	/**
-	 * Translate a label/value pair, such as “Occupation: Farmer”
-	 *
-	 * @param string            $tag
-	 * @param string            $value
-	 * @param GedcomRecord|null $record
-	 * @param string|null       $element
-	 *
-	 * @return string
-	 */
-	public static function getLabelValue($tag, $value, GedcomRecord $record = null, $element = 'div') {
-		return
-			'<' . $element . ' class="fact_' . $tag . '">' .
-			/* I18N: a label/value pair, such as “Occupation: Farmer”. Some languages may need to change the punctuation. */
-			I18N::translate('<span class="label">%1$s:</span> <span class="field" dir="auto">%2$s</span>', self::getLabel($tag, $record), $value) .
-			'</' . $element . '>';
-	}
+    /**
+     * Translate a label/value pair, such as “Occupation: Farmer”
+     *
+     * @param string            $tag
+     * @param string            $value
+     * @param GedcomRecord|null $record
+     * @param string|null       $element
+     *
+     * @return string
+     */
+    public static function getLabelValue($tag, $value, GedcomRecord $record = null, $element = 'div') {
+        return
+            '<' . $element . ' class="fact_' . $tag . '">' .
+            /* I18N: a label/value pair, such as “Occupation: Farmer”. Some languages may need to change the punctuation. */
+            I18N::translate('<span class="label">%1$s:</span> <span class="field" dir="auto">%2$s</span>', self::getLabel($tag, $record), $value) .
+            '</' . $element . '>';
+    }
 
-	/**
-	 * Get a list of facts, for use in the "fact picker" edit control
-	 *
-	 * @return string[]
-	 */
-	public static function getPicklistFacts($fact_type) {
-		switch ($fact_type) {
-		case 'INDI':
-			$tags = array(
-				// Facts, attributes for individuals (no links to FAMs)
-				'RESN', 'NAME', 'SEX', 'BIRT', 'CHR', 'DEAT', 'BURI', 'CREM',
-				'ADOP', 'BAPM', 'BARM', 'BASM', 'BLES', 'CHRA', 'CONF', 'FCOM', 'ORDN',
-				'NATU', 'EMIG', 'IMMI', 'CENS', 'PROB', 'WILL', 'GRAD', 'RETI', 'EVEN',
-				'CAST', 'DSCR', 'EDUC', 'IDNO', 'NATI', 'NCHI', 'NMR',
-				'OCCU', 'PROP', 'RELI', 'RESI', 'SSN', 'TITL', 'FACT',
-				'BAPL', 'CONL', 'ENDL', 'SLGC',
-				'SUBM', 'ASSO', 'ALIA', 'ANCI', 'DESI', 'RFN', 'AFN',
-				'REFN', 'RIN', 'CHAN', 'NOTE', 'SHARED_NOTE', 'SOUR', 'OBJE',
-				// non standard tags
-				'_BRTM', '_DEG', '_DNA', '_EYEC', '_FNRL', '_HAIR', '_HEIG', '_HNM',
-				'_HOL', '_INTE', '_MDCL', '_MEDC', '_MILI', '_MILT', '_NAME', '_NAMS',
-				'_NLIV', '_NMAR', '_PRMN', '_TODO', '_UID', '_WEIG', '_YART',
-			);
-			break;
-		case 'FAM':
-			$tags = array(
-				// Facts for families, left out HUSB, WIFE & CHIL links
-				'RESN', 'ANUL', 'CENS', 'DIV', 'DIVF', 'ENGA', 'MARB', 'MARC',
-				'MARR', 'MARL', 'MARS', 'RESI', 'EVEN', 'NCHI', 'SUBM', 'SLGS',
-				'REFN', 'RIN', 'CHAN', 'NOTE', 'SHARED_NOTE', 'SOUR', 'OBJE',
-				// non standard tags
-				'_NMR', 'MARR_CIVIL', 'MARR_RELIGIOUS', 'MARR_PARTNERS', 'MARR_UNKNOWN',
-				'_COML', '_MBON', '_MARI', '_SEPR', '_TODO',
-			);
-		break;
-		case 'SOUR':
-			$tags = array(
-				// Facts for sources
-				'DATA', 'AUTH', 'TITL', 'ABBR', 'PUBL', 'TEXT', 'REPO', 'REFN', 'RIN',
-				'CHAN', 'NOTE', 'SHARED_NOTE', 'OBJE',
-				'RESN',
-			);
-			break;
-		case 'REPO':
-			$tags = array(
-				// Facts for repositories
-				'NAME', 'ADDR', 'PHON', 'EMAIL', 'FAX', 'WWW',
-				'NOTE', 'SHARED_NOTE', 'REFN', 'RIN', 'CHAN',
-				'RESN',
-			);
-			break;
-		case 'PLAC':
-			$tags = array(
-				// Facts for places
-				'FONE', 'ROMN',
-				// non standard tags
-				'_HEB',
-			);
-			break;
-		case 'NAME':
-			$tags = array(
-				// Facts subordinate to NAME
-				'NICK', 'FONE', 'ROMN',
-				// non standard tags
-				'_HEB', '_AKA',
-			);
-			break;
-		default:
-			$tags = array();
-			break;
-		}
+    /**
+     * Get a list of facts, for use in the "fact picker" edit control
+     *
+     * @return string[]
+     */
+    public static function getPicklistFacts($fact_type) {
+        switch ($fact_type) {
+        case 'INDI':
+            $tags = array(
+                // Facts, attributes for individuals (no links to FAMs)
+                'RESN', 'NAME', 'SEX', 'BIRT', 'CHR', 'DEAT', 'BURI', 'CREM',
+                'ADOP', 'BAPM', 'BARM', 'BASM', 'BLES', 'CHRA', 'CONF', 'FCOM', 'ORDN',
+                'NATU', 'EMIG', 'IMMI', 'CENS', 'PROB', 'WILL', 'GRAD', 'RETI', 'EVEN',
+                'CAST', 'DSCR', 'EDUC', 'IDNO', 'NATI', 'NCHI', 'NMR',
+                'OCCU', 'PROP', 'RELI', 'RESI', 'SSN', 'TITL', 'FACT',
+                'BAPL', 'CONL', 'ENDL', 'SLGC',
+                'SUBM', 'ASSO', 'ALIA', 'ANCI', 'DESI', 'RFN', 'AFN',
+                'REFN', 'RIN', 'CHAN', 'NOTE', 'SHARED_NOTE', 'SOUR', 'OBJE',
+                // non standard tags
+                '_BRTM', '_DEG', '_DNA', '_EYEC', '_FNRL', '_HAIR', '_HEIG', '_HNM',
+                '_HOL', '_INTE', '_MDCL', '_MEDC', '_MILI', '_MILT', '_NAME', '_NAMS',
+                '_NLIV', '_NMAR', '_PRMN', '_TODO', '_UID', '_WEIG', '_YART',
+            );
+            break;
+        case 'FAM':
+            $tags = array(
+                // Facts for families, left out HUSB, WIFE & CHIL links
+                'RESN', 'ANUL', 'CENS', 'DIV', 'DIVF', 'ENGA', 'MARB', 'MARC',
+                'MARR', 'MARL', 'MARS', 'RESI', 'EVEN', 'NCHI', 'SUBM', 'SLGS',
+                'REFN', 'RIN', 'CHAN', 'NOTE', 'SHARED_NOTE', 'SOUR', 'OBJE',
+                // non standard tags
+                '_NMR', 'MARR_CIVIL', 'MARR_RELIGIOUS', 'MARR_PARTNERS', 'MARR_UNKNOWN',
+                '_COML', '_MBON', '_MARI', '_SEPR', '_TODO',
+            );
+        break;
+        case 'SOUR':
+            $tags = array(
+                // Facts for sources
+                'DATA', 'AUTH', 'TITL', 'ABBR', 'PUBL', 'TEXT', 'REPO', 'REFN', 'RIN',
+                'CHAN', 'NOTE', 'SHARED_NOTE', 'OBJE',
+                'RESN',
+            );
+            break;
+        case 'REPO':
+            $tags = array(
+                // Facts for repositories
+                'NAME', 'ADDR', 'PHON', 'EMAIL', 'FAX', 'WWW',
+                'NOTE', 'SHARED_NOTE', 'REFN', 'RIN', 'CHAN',
+                'RESN',
+            );
+            break;
+        case 'PLAC':
+            $tags = array(
+                // Facts for places
+                'FONE', 'ROMN',
+                // non standard tags
+                '_HEB',
+            );
+            break;
+        case 'NAME':
+            $tags = array(
+                // Facts subordinate to NAME
+                'NICK', 'FONE', 'ROMN',
+                // non standard tags
+                '_HEB', '_AKA',
+            );
+            break;
+        default:
+            $tags = array();
+            break;
+        }
 
-		$facts = array();
-		foreach ($tags as $tag) {
-			$facts[$tag] = self::getLabel($tag, null);
-		}
-		uasort($facts, '\Fisharebest\Webtrees\I18N::strcasecmp');
+        $facts = array();
+        foreach ($tags as $tag) {
+            $facts[$tag] = self::getLabel($tag, null);
+        }
+        uasort($facts, '\Fisharebest\Webtrees\I18N::strcasecmp');
 
-		return $facts;
-	}
+        return $facts;
+    }
 
-	/**
-	 * Translate the value for 1 FILE/2 FORM/3 TYPE
-	 *
-	 * @param string $type
-	 *
-	 * @return string
-	 */
-	public static function getFileFormTypeValue($type) {
-		switch (strtolower($type)) {
-		case 'audio':
-			return /* I18N: Type of media object */ I18N::translate('Audio');
-		case 'book':
-			return /* I18N: Type of media object */ I18N::translate('Book');
-		case 'card':
-			return /* I18N: Type of media object */ I18N::translate('Card');
-		case 'certificate':
-			return /* I18N: Type of media object */ I18N::translate('Certificate');
-		case 'coat':
-			return /* I18N: Type of media object */ I18N::translate('Coat of arms');
-		case 'document':
-			return /* I18N: Type of media object */ I18N::translate('Document');
-		case 'electronic':
-			return /* I18N: Type of media object */ I18N::translate('Electronic');
-		case 'fiche':
-			return /* I18N: Type of media object */ I18N::translate('Microfiche');
-		case 'film':
-			return /* I18N: Type of media object */ I18N::translate('Microfilm');
-		case 'magazine':
-			return /* I18N: Type of media object */ I18N::translate('Magazine');
-		case 'manuscript':
-			return /* I18N: Type of media object */ I18N::translate('Manuscript');
-		case 'map':
-			return /* I18N: Type of media object */ I18N::translate('Map');
-		case 'newspaper':
-			return /* I18N: Type of media object */ I18N::translate('Newspaper');
-		case 'photo':
-			return /* I18N: Type of media object */ I18N::translate('Photo');
-		case 'tombstone':
-			return /* I18N: Type of media object */ I18N::translate('Tombstone');
-		case 'video':
-			return /* I18N: Type of media object */ I18N::translate('Video');
-		case 'painting':
-			return /* I18N: Type of media object */ I18N::translate('Painting');
-		default:
-			return /* I18N: Type of media object */ I18N::translate('Other');
-		}
-	}
+    /**
+     * Translate the value for 1 FILE/2 FORM/3 TYPE
+     *
+     * @param string $type
+     *
+     * @return string
+     */
+    public static function getFileFormTypeValue($type) {
+        switch (strtolower($type)) {
+        case 'audio':
+            return /* I18N: Type of media object */ I18N::translate('Audio');
+        case 'book':
+            return /* I18N: Type of media object */ I18N::translate('Book');
+        case 'card':
+            return /* I18N: Type of media object */ I18N::translate('Card');
+        case 'certificate':
+            return /* I18N: Type of media object */ I18N::translate('Certificate');
+        case 'coat':
+            return /* I18N: Type of media object */ I18N::translate('Coat of arms');
+        case 'document':
+            return /* I18N: Type of media object */ I18N::translate('Document');
+        case 'electronic':
+            return /* I18N: Type of media object */ I18N::translate('Electronic');
+        case 'fiche':
+            return /* I18N: Type of media object */ I18N::translate('Microfiche');
+        case 'film':
+            return /* I18N: Type of media object */ I18N::translate('Microfilm');
+        case 'magazine':
+            return /* I18N: Type of media object */ I18N::translate('Magazine');
+        case 'manuscript':
+            return /* I18N: Type of media object */ I18N::translate('Manuscript');
+        case 'map':
+            return /* I18N: Type of media object */ I18N::translate('Map');
+        case 'newspaper':
+            return /* I18N: Type of media object */ I18N::translate('Newspaper');
+        case 'photo':
+            return /* I18N: Type of media object */ I18N::translate('Photo');
+        case 'tombstone':
+            return /* I18N: Type of media object */ I18N::translate('Tombstone');
+        case 'video':
+            return /* I18N: Type of media object */ I18N::translate('Video');
+        case 'painting':
+            return /* I18N: Type of media object */ I18N::translate('Painting');
+        default:
+            return /* I18N: Type of media object */ I18N::translate('Other');
+        }
+    }
 
-	/**
-	 * A list of all possible values for 1 FILE/2 FORM/3 TYPE
-	 *
-	 * @return string[]
-	 */
-	public static function getFileFormTypes() {
-		$values = array();
-		foreach (self::$OBJE_FILE_FORM_TYPE as $type) {
-			$values[$type] = self::getFileFormTypeValue($type);
-		}
-		uasort($values, '\Fisharebest\Webtrees\I18N::strcasecmp');
+    /**
+     * A list of all possible values for 1 FILE/2 FORM/3 TYPE
+     *
+     * @return string[]
+     */
+    public static function getFileFormTypes() {
+        $values = array();
+        foreach (self::$OBJE_FILE_FORM_TYPE as $type) {
+            $values[$type] = self::getFileFormTypeValue($type);
+        }
+        uasort($values, '\Fisharebest\Webtrees\I18N::strcasecmp');
 
-		return $values;
-	}
+        return $values;
+    }
 
-	/**
-	 * Generate a value for a new _UID field.
-	 * Instead of RFC4122-compatible UUIDs, generate ones that
-	 * are compatible with PAF, Legacy, RootsMagic, etc.
-	 * In these, the string is upper-cased, dashes are removed,
-	 * and a two-byte checksum is added.
-	 *
-	 * @return string
-	 */
-	public static function createUid() {
-		$uid = str_replace('-', '', Uuid::uuid4());
+    /**
+     * Generate a value for a new _UID field.
+     * Instead of RFC4122-compatible UUIDs, generate ones that
+     * are compatible with PAF, Legacy, RootsMagic, etc.
+     * In these, the string is upper-cased, dashes are removed,
+     * and a two-byte checksum is added.
+     *
+     * @return string
+     */
+    public static function createUid() {
+        $uid = str_replace('-', '', Uuid::uuid4());
 
-		$checksum_a = 0; // a sum of the bytes
-		$checksum_b = 0; // a sum of the incremental values of $checksum_a
+        $checksum_a = 0; // a sum of the bytes
+        $checksum_b = 0; // a sum of the incremental values of $checksum_a
 
-		// Compute checksums
-		for ($i = 0; $i < 32; $i += 2) {
-			$checksum_a += hexdec(substr($uid, $i, 2));
-			$checksum_b += $checksum_a & 0xff;
-		}
+        // Compute checksums
+        for ($i = 0; $i < 32; $i += 2) {
+            $checksum_a += hexdec(substr($uid, $i, 2));
+            $checksum_b += $checksum_a & 0xff;
+        }
 
-		return strtoupper($uid . substr(dechex($checksum_a), -2) . substr(dechex($checksum_b), -2));
-	}
+        return strtoupper($uid . substr(dechex($checksum_a), -2) . substr(dechex($checksum_b), -2));
+    }
 }

Switch Indentation +1780 added lines, -1780 removed lines

@@ -112,1689 +112,1689 @@ 
 		}
 
 		switch ($tag) {
-		case 'ABBR':
-			return
-				/* I18N: gedcom tag ABBR */
-				I18N::translate('Abbreviation');
-		case 'ADDR':
-			return
-				/* I18N: gedcom tag ADDR */
-				I18N::translate('Address');
-		case 'ADR1':
-			return I18N::translate('Address line 1');
-		case 'ADR2':
-			return I18N::translate('Address line 2');
-		case 'ADOP':
-			return
-				/* I18N: gedcom tag ADOP */
-				I18N::translate('Adoption');
-		case 'ADOP:DATE':
-			return I18N::translate('Date of adoption');
-		case 'ADOP:PLAC':
-			return I18N::translate('Place of adoption');
-		case 'AFN':
-			return
-				/* I18N: gedcom tag AFN */
-				I18N::translate('Ancestral file number');
-		case 'AGE':
-			return
-				/* I18N: gedcom tag AGE */
-				I18N::translate('Age');
-		case 'AGNC':
-			return
-				/* I18N: gedcom tag AGNC */
-				I18N::translate('Agency');
-		case 'ALIA':
-			return
-				/* I18N: gedcom tag ALIA */
-				I18N::translate('Alias');
-		case 'ANCE':
-			return
-				/* I18N: gedcom tag ANCE */
-				I18N::translate('Generations of ancestors');
-		case 'ANCI':
-			return
-				/* I18N: gedcom tag ANCI */
-				I18N::translate('Ancestors interest');
-		case 'ANUL':
-			return
-				/* I18N: gedcom tag ANUL */
-				I18N::translate('Annulment');
-		case 'ASSO':
-			return
-				/* I18N: gedcom tag ASSO */
-				I18N::translate('Associate'); /* see also _ASSO */
-		case 'AUTH':
-			return
-				/* I18N: gedcom tag AUTH */
-				I18N::translate('Author');
-		case 'BAPL':
-			return
-				/* I18N: gedcom tag BAPL. LDS = Church of Latter Day Saints. */
-				I18N::translate('LDS baptism');
-		case 'BAPL:DATE':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS baptism');
-		case 'BAPL:PLAC':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS baptism');
-		case 'BAPM':
-			return
-				/* I18N: gedcom tag BAPM */
-				I18N::translate('Baptism');
-		case 'BAPM:DATE':
-			return I18N::translate('Date of baptism');
-		case 'BAPM:PLAC':
-			return I18N::translate('Place of baptism');
-		case 'BARM':
-			return
-				/* I18N: gedcom tag BARM */
-				I18N::translate('Bar mitzvah');
-		case 'BARM:DATE':
-			return I18N::translate('Date of bar mitzvah');
-		case 'BARM:PLAC':
-			return I18N::translate('Place of bar mitzvah');
-		case 'BASM':
-			return
-				/* I18N: gedcom tag BASM */
-				I18N::translate('Bat mitzvah');
-		case 'BASM:DATE':
-			return I18N::translate('Date of bat mitzvah');
-		case 'BASM:PLAC':
-			return I18N::translate('Place of bat mitzvah');
-		case 'BIRT':
-			return
-				/* I18N: gedcom tag BIRT */
-				I18N::translate('Birth');
-		case 'BIRT:DATE':
-			return I18N::translate('Date of birth');
-		case 'BIRT:PLAC':
-			return I18N::translate('Place of birth');
-		case 'BLES':
-			return
-				/* I18N: gedcom tag BLES */
-				I18N::translate('Blessing');
-		case 'BLES:DATE':
-			return I18N::translate('Date of blessing');
-		case 'BLES:PLAC':
-			return I18N::translate('Place of blessing');
-		case 'BLOB':
-			return
-				/* I18N: gedcom tag BLOB */
-				I18N::translate('Binary data object');
-		case 'BURI':
-			return
-				/* I18N: gedcom tag BURI */
-				I18N::translate('Burial');
-		case 'BURI:DATE':
-			return I18N::translate('Date of burial');
-		case 'BURI:PLAC':
-			return I18N::translate('Place of burial');
-		case 'CALN':
-			return
-				/* I18N: gedcom tag CALN */
-				I18N::translate('Call number');
-		case 'CAST':
-			return
-				/* I18N: gedcom tag CAST */
-				I18N::translate('Caste');
-		case 'CAUS':
-			return
-				/* I18N: gedcom tag CAUS */
-				I18N::translate('Cause');
-		case 'CEME':
-			return
-				/* I18N: gedcom tag CEME */
-				I18N::translate('Cemetery');
-		case 'CENS':
-			return
-				/* I18N: gedcom tag CENS */
-				I18N::translate('Census');
-		case 'CENS:DATE':
-			return I18N::translate('Census date');
-		case 'CENS:PLAC':
-			return I18N::translate('Census place');
-		case 'CHAN':
-			return
-				/* I18N: gedcom tag CHAN */
-				I18N::translate('Last change');
-		case 'CHAN:DATE':
-			return
-				/* I18N: gedcom tag CHAN:DATE */
-				I18N::translate('Date of last change');
-		case 'CHAN:_WT_USER':
-			return
-				/* I18N: gedcom tag CHAN:_WT_USER */
-				I18N::translate('Author of last change');
-		case 'CHAR':
-			return
-				/* I18N: gedcom tag CHAR */
-				I18N::translate('Character set');
-		case 'CHIL':
-			return
-				/* I18N: gedcom tag CHIL */
-				I18N::translate('Child');
-		case 'CHR':
-			return
-				/* I18N: gedcom tag CHR */
-				I18N::translate('Christening');
-		case 'CHR:DATE':
-			return I18N::translate('Date of christening');
-		case 'CHR:PLAC':
-			return I18N::translate('Place of christening');
-		case 'CHRA':
-			return
-				/* I18N: gedcom tag CHRA */
-				I18N::translate('Adult christening');
-		case 'CITN':
-			return
-				/* I18N: gedcom tag CITN */
-				I18N::translate('Citizenship');
-		case 'CITY':
-			return
-				/* I18N: gedcom tag CITY */
-				I18N::translate('City');
-		case 'COMM':
-			return
-				/* I18N: gedcom tag COMM */
-				I18N::translate('Comment');
-		case 'CONC':
-			return
-				/* I18N: gedcom tag CONC */
-				I18N::translate('Concatenation');
-		case 'CONT':
-			return
-				/* I18N: gedcom tag CONT */
-				I18N::translate('Continued');
-		case 'CONF':
-			return
-				/* I18N: gedcom tag CONF */
-				I18N::translate('Confirmation');
-		case 'CONF:DATE':
-			return I18N::translate('Date of confirmation');
-		case 'CONF:PLAC':
-			return I18N::translate('Place of confirmation');
-		case 'CONL':
-			return
-				/* I18N: gedcom tag CONL. LDS = Church of Latter Day Saints. */
-				I18N::translate('LDS confirmation');
-		case 'COPR':
-			return
-				/* I18N: gedcom tag COPR */
-				I18N::translate('Copyright');
-		case 'CORP':
-			return
-				/* I18N: gedcom tag CORP */
-				I18N::translate('Corporation');
-		case 'CREM':
-			return
-				/* I18N: gedcom tag CREM */
-				I18N::translate('Cremation');
-		case 'CREM:DATE':
-			return I18N::translate('Date of cremation');
-		case 'CREM:PLAC':
-			return I18N::translate('Place of cremation');
-		case 'CTRY':
-			return
-				/* I18N: gedcom tag CTRY */
-				I18N::translate('Country');
-		case 'DATA':
-			return
-				/* I18N: gedcom tag DATA */
-				I18N::translate('Data');
-		case 'DATA:DATE':
-			return I18N::translate('Date of entry in original source');
-		case 'DATE':
-			return
-				/* I18N: gedcom tag DATE */
-				I18N::translate('Date');
-		case 'DEAT':
-			return
-				/* I18N: gedcom tag DEAT */
-				I18N::translate('Death');
-		case 'DEAT:CAUS':
-			return I18N::translate('Cause of death');
-		case 'DEAT:DATE':
-			return I18N::translate('Date of death');
-		case 'DEAT:PLAC':
-			return I18N::translate('Place of death');
-		case 'DESC':
-			return
-				/* I18N: gedcom tag DESC */
-				I18N::translate('Descendants');
-		case 'DESI':
-			return
-				/* I18N: gedcom tag DESI */
-				I18N::translate('Descendants interest');
-		case 'DEST':
-			return
-				/* I18N: gedcom tag DEST */
-				I18N::translate('Destination');
-		case 'DIV':
-			return
-				/* I18N: gedcom tag DIV */
-				I18N::translate('Divorce');
-		case 'DIVF':
-			return
-				/* I18N: gedcom tag DIVF */
-				I18N::translate('Divorce filed');
-		case 'DSCR':
-			return
-				/* I18N: gedcom tag DSCR */
-				I18N::translate('Description');
-		case 'EDUC':
-			return
-				/* I18N: gedcom tag EDUC */
-				I18N::translate('Education');
-		case 'EDUC:AGNC':
-			return I18N::translate('School or college');
-		case 'EMAI':
-			return
-				/* I18N: gedcom tag EMAI */
-				I18N::translate('Email address');
-		case 'EMAIL':
-			return
-				/* I18N: gedcom tag EMAIL */
-				I18N::translate('Email address');
-		case 'EMAL':
-			return
-				/* I18N: gedcom tag EMAL */
-				I18N::translate('Email address');
-		case 'EMIG':
-			return
-				/* I18N: gedcom tag EMIG */
-				I18N::translate('Emigration');
-		case 'EMIG:DATE':
-			return I18N::translate('Date of emigration');
-		case 'EMIG:PLAC':
-			return I18N::translate('Place of emigration');
-		case 'ENDL':
-			return
-				/* I18N: gedcom tag ENDL. LDS = Church of Latter Day Saints. */
-				I18N::translate('LDS endowment');
-		case 'ENDL:DATE':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS endowment');
-		case 'ENDL:PLAC':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS endowment');
-		case 'ENGA':
-			return
-				/* I18N: gedcom tag ENGA */
-				I18N::translate('Engagement');
-		case 'ENGA:DATE':
-			return I18N::translate('Date of engagement');
-		case 'ENGA:PLAC':
-			return I18N::translate('Place of engagement');
-		case 'EVEN':
-			return
-				/* I18N: gedcom tag EVEN */
-				I18N::translate('Event');
-		case 'EVEN:DATE':
-			return I18N::translate('Date of event');
-		case 'EVEN:PLAC':
-			return I18N::translate('Place of event');
-		case 'EVEN:TYPE':
-			return I18N::translate('Type of event');
-		case 'FACT':
-			return
-				/* I18N: gedcom tag FACT */
-				I18N::translate('Fact');
-		case 'FACT:TYPE':
-			return I18N::translate('Type of fact');
-		case 'FAM':
-			return
-				/* I18N: gedcom tag FAM */
-				I18N::translate('Family');
-		case 'FAMC':
-			return
-				/* I18N: gedcom tag FAMC */
-				I18N::translate('Family as a child');
-		case 'FAMF':
-			return
-				/* I18N: gedcom tag FAMF */
-				I18N::translate('Family file');
-		case 'FAMS':
-			return
-				/* I18N: gedcom tag FAMS */
-				I18N::translate('Family as a spouse');
-		case 'FAMS:CENS:DATE':
-			return I18N::translate('Spouse census date');
-		case 'FAMS:CENS:PLAC':
-			return I18N::translate('Spouse census place');
-		case 'FAMS:DIV:DATE':
-			return I18N::translate('Date of divorce');
-		case 'FAMS:MARR:DATE':
-			return I18N::translate('Date of marriage');
-		case 'FAMS:MARR:PLAC':
-			return I18N::translate('Place of marriage');
-		case 'FAMS:NOTE':
-			return I18N::translate('Spouse note');
-		case 'FAMS:SLGS:DATE':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS spouse sealing');
-		case 'FAMS:SLGS:PLAC':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS spouse sealing');
-		case 'FAX':
-			return
-				/* I18N: gedcom tag FAX */
-				I18N::translate('Fax');
-		case 'FCOM':
-			return
-				/* I18N: gedcom tag FCOM */
-				I18N::translate('First communion');
-		case 'FCOM:DATE':
-			return I18N::translate('Date of first communion');
-		case 'FCOM:PLAC':
-			return I18N::translate('Place of first communion');
-		case 'FILE':
-			return
-				/* I18N: gedcom tag FILE */
-				I18N::translate('Filename');
-		case 'FONE':
-			return
-				/* I18N: gedcom tag FONE */
-				I18N::translate('Phonetic');
-		case 'FORM':
-			return
-				/* I18N: gedcom tag FORM */
-				I18N::translate('Format');
-		case 'GEDC':
-			return
-				/* I18N: gedcom tag GEDC */
-				I18N::translate('GEDCOM file');
-		case 'GIVN':
-			return
-				/* I18N: gedcom tag GIVN */
-				I18N::translate('Given names');
-		case 'GRAD':
-			return
-				/* I18N: gedcom tag GRAD */
-				I18N::translate('Graduation');
-		case 'HEAD':
-			return
-				/* I18N: gedcom tag HEAD */
-				I18N::translate('Header');
-		case 'HUSB':
-			return
-				/* I18N: gedcom tag HUSB */
-				I18N::translate('Husband');
-		case 'IDNO':
-			return
-				/* I18N: gedcom tag IDNO */
-				I18N::translate('Identification number');
-		case 'IMMI':
-			return
-				/* I18N: gedcom tag IMMI */
-				I18N::translate('Immigration');
-		case 'IMMI:DATE':
-			return I18N::translate('Date of immigration');
-		case 'IMMI:PLAC':
-			return I18N::translate('Place of immigration');
-		case 'INDI':
-			return
-				/* I18N: gedcom tag INDI */
-				I18N::translate('Individual');
-		case 'INFL':
-			return
-				/* I18N: gedcom tag INFL */
-				I18N::translate('Infant');
-		case 'LANG':
-			return
-				/* I18N: gedcom tag LANG */
-				I18N::translate('Language');
-		case 'LATI':
-			return
-				/* I18N: gedcom tag LATI */
-				I18N::translate('Latitude');
-		case 'LEGA':
-			return
-				/* I18N: gedcom tag LEGA */
-				I18N::translate('Legatee');
-		case 'LONG':
-			return
-				/* I18N: gedcom tag LONG */
-				I18N::translate('Longitude');
-		case 'MAP':
-			return
-				/* I18N: gedcom tag MAP */
-				I18N::translate('Map');
-		case 'MARB':
-			return
-				/* I18N: gedcom tag MARB */
-				I18N::translate('Marriage banns');
-		case 'MARB:DATE':
-			return I18N::translate('Date of marriage banns');
-		case 'MARB:PLAC':
-			return I18N::translate('Place of marriage banns');
-		case 'MARC':
-			return
-				/* I18N: gedcom tag MARC */
-				I18N::translate('Marriage contract');
-		case 'MARL':
-			return
-				/* I18N: gedcom tag MARL */
-				I18N::translate('Marriage license');
-		case 'MARR':
-			return
-				/* I18N: gedcom tag MARR */
-				I18N::translate('Marriage');
-		case 'MARR:DATE':
-			return I18N::translate('Date of marriage');
-		case 'MARR:PLAC':
-			return I18N::translate('Place of marriage');
-		case 'MARR_CIVIL':
-			return I18N::translate('Civil marriage');
-		case 'MARR_PARTNERS':
-			return I18N::translate('Registered partnership');
-		case 'MARR_RELIGIOUS':
-			return I18N::translate('Religious marriage');
-		case 'MARR_UNKNOWN':
-			return I18N::translate('Marriage type unknown');
-		case 'MARS':
-			return
-				/* I18N: gedcom tag MARS */
-				I18N::translate('Marriage settlement');
-		case 'MEDI':
-			return
-				/* I18N: gedcom tag MEDI */
-				I18N::translate('Media type');
-		case 'NAME':
-			if ($record instanceof Repository) {
-				return
-					/* I18N: gedcom tag REPO:NAME */
-					I18N::translateContext('Repository', 'Name');
-			} else {
-				return
-					/* I18N: gedcom tag NAME */
-					I18N::translate('Name');
-			}
-		case 'NAME:FONE':
-			return I18N::translate('Phonetic name');
-		case 'NAME:_HEB':
-			return I18N::translate('Name in Hebrew');
-		case 'NATI':
-			return
-				/* I18N: gedcom tag NATI */
-				I18N::translate('Nationality');
-		case 'NATU':
-			return
-				/* I18N: gedcom tag NATU */
-				I18N::translate('Naturalization');
-		case 'NATU:DATE':
-			return I18N::translate('Date of naturalization');
-		case 'NATU:PLAC':
-			return I18N::translate('Place of naturalization');
-		case 'NCHI':
-			return
-				/* I18N: gedcom tag NCHI */
-				I18N::translate('Number of children');
-		case 'NICK':
-			return
-				/* I18N: gedcom tag NICK */
-				I18N::translate('Nickname');
-		case 'NMR':
-			return
-				/* I18N: gedcom tag NMR */
-				I18N::translate('Number of marriages');
-		case 'NOTE':
-			return
-				/* I18N: gedcom tag NOTE */
-				I18N::translate('Note');
-		case 'NPFX':
-			return
-				/* I18N: gedcom tag NPFX */
-				I18N::translate('Name prefix');
-		case 'NSFX':
-			return
-				/* I18N: gedcom tag NSFX */
-				I18N::translate('Name suffix');
-		case 'OBJE':
-			return
-				/* I18N: gedcom tag OBJE */
-				I18N::translate('Media object');
-		case 'OCCU':
-			return
-				/* I18N: gedcom tag OCCU */
-				I18N::translate('Occupation');
-		case 'OCCU:AGNC':
-			return I18N::translate('Employer');
-		case 'ORDI':
-			return
-				/* I18N: gedcom tag ORDI */
-				I18N::translate('Ordinance');
-		case 'ORDN':
-			return
-				/* I18N: gedcom tag ORDN */
-				I18N::translate('Ordination');
-		case 'ORDN:AGNC':
-			return I18N::translate('Religious institution');
-		case 'ORDN:DATE':
-			return I18N::translate('Date of ordination');
-		case 'ORDN:PLAC':
-			return I18N::translate('Place of ordination');
-		case 'PAGE':
-			return
-				/* I18N: gedcom tag PAGE */
-				I18N::translate('Citation details');
-		case 'PEDI':
-			return
-				/* I18N: gedcom tag PEDI */
-				I18N::translate('Relationship to parents');
-		case 'PHON':
-			return
-				/* I18N: gedcom tag PHON */
-				I18N::translate('Phone');
-		case 'PLAC':
-			return
-				/* I18N: gedcom tag PLAC */
-				I18N::translate('Place');
-		case 'PLAC:FONE':
-			return I18N::translate('Phonetic place');
-		case 'PLAC:ROMN':
-			return I18N::translate('Romanized place');
-		case 'PLAC:_HEB':
-			return I18N::translate('Place in Hebrew');
-		case 'POST':
-			return
-				/* I18N: gedcom tag POST */
-				I18N::translate('Postal code');
-		case 'PROB':
-			return
-				/* I18N: gedcom tag PROB */
-				I18N::translate('Probate');
-		case 'PROP':
-			return
-				/* I18N: gedcom tag PROP */
-				I18N::translate('Property');
-		case 'PUBL':
-			return
-				/* I18N: gedcom tag PUBL */
-				I18N::translate('Publication');
-		case 'QUAY':
-			return
-				/* I18N: gedcom tag QUAY */
-				I18N::translate('Quality of data');
-		case 'REFN':
-			return
-				/* I18N: gedcom tag REFN */
-				I18N::translate('Reference number');
-		case 'RELA':
-			return
-				/* I18N: gedcom tag RELA */
-				I18N::translate('Relationship');
-		case 'RELI':
-			return
-				/* I18N: gedcom tag RELI */
-				I18N::translate('Religion');
-		case 'REPO':
-			return
-				/* I18N: gedcom tag REPO */
-				I18N::translate('Repository');
-		case 'RESI':
-			return
-				/* I18N: gedcom tag RESI */
-				I18N::translate('Residence');
-		case 'RESI:DATE':
-			return I18N::translate('Date of residence');
-		case 'RESI:PLAC':
-			return I18N::translate('Place of residence');
-		case 'RESN':
-			return
-				/* I18N: gedcom tag RESN */
-				I18N::translate('Restriction');
-		case 'RETI':
-			return
-				/* I18N: gedcom tag RETI */
-				I18N::translate('Retirement');
-		case 'RETI:AGNC':
-			return I18N::translate('Employer');
-		case 'RFN':
-			return
-				/* I18N: gedcom tag RFN */
-				I18N::translate('Record file number');
-		case 'RIN':
-			return
-				/* I18N: gedcom tag RIN */
-				I18N::translate('Record ID number');
-		case 'ROLE':
-			return
-				/* I18N: gedcom tag ROLE */
-				I18N::translate('Role');
-		case 'ROMN':
-			return
-				/* I18N: gedcom tag ROMN */
-				I18N::translate('Romanized');
-		case 'SERV':
-			return
-				/* I18N: gedcom tag SERV */
-				I18N::translate('Remote server');
-		case 'SEX':
-			return
-				/* I18N: gedcom tag SEX */
-				I18N::translate('Gender');
-		case 'SHARED_NOTE':
-			return I18N::translate('Shared note');
-		case 'SLGC':
-			return
-				/* I18N: gedcom tag SLGC. LDS = Church of Latter Day Saints. */
-				I18N::translate('LDS child sealing');
-		case 'SLGC:DATE':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS child sealing');
-		case 'SLGC:PLAC':
-			return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS child sealing');
-		case 'SLGS':
-			return
-				/* I18N: gedcom tag SLGS. LDS = Church of Latter Day Saints. */
-				I18N::translate('LDS spouse sealing');
-		case 'SOUR':
-			return
-				/* I18N: gedcom tag SOUR */
-				I18N::translate('Source');
-		case 'SPFX':
-			return
-				/* I18N: gedcom tag SPFX */
-				I18N::translate('Surname prefix');
-		case 'SSN':
-			return
-				/* I18N: gedcom tag SSN */
-				I18N::translate('Social security number');
-		case 'STAE':
-			return
-				/* I18N: gedcom tag STAE */
-				I18N::translate('State');
-		case 'STAT':
-			return
-				/* I18N: gedcom tag STAT */
-				I18N::translate('Status');
-		case 'STAT:DATE':
-			return I18N::translate('Status change date');
-		case 'SUBM':
-			return
-				/* I18N: gedcom tag SUBM */
-				I18N::translate('Submitter');
-		case 'SUBN':
-			return
-				/* I18N: gedcom tag SUBN */
-				I18N::translate('Submission');
-		case 'SURN':
-			return
-				/* I18N: gedcom tag SURN */
-				I18N::translate('Surname');
-		case 'TEMP':
-			return
-				/* I18N: gedcom tag TEMP */
-				I18N::translate('Temple');
-		case 'TEXT':
-			return
-				/* I18N: gedcom tag TEXT */
-				I18N::translate('Text');
-		case 'TIME':
-			return
-				/* I18N: gedcom tag TIME */
-				I18N::translate('Time');
-		case 'TITL':
-			return
-				/* I18N: gedcom tag TITL */
-				I18N::translate('Title');
-		case 'TITL:FONE':
-			return I18N::translate('Phonetic title');
-		case 'TITL:ROMN':
-			return I18N::translate('Romanized title');
-		case 'TITL:_HEB':
-			return I18N::translate('Title in Hebrew');
-		case 'TRLR':
-			return
-				/* I18N: gedcom tag TRLR */
-				I18N::translate('Trailer');
-		case 'TYPE':
-			return
-				/* I18N: gedcom tag TYPE */
-				I18N::translate('Type');
-		case 'URL':
-			return
-				/* I18N: gedcom tag URL (A web address / URL) */
-				I18N::translate('URL');
-		case 'VERS':
-			return
-				/* I18N: gedcom tag VERS */
-				I18N::translate('Version');
-		case 'WIFE':
-			return
-				/* I18N: gedcom tag WIFE */
-				I18N::translate('Wife');
-		case 'WILL':
-			return
-				/* I18N: gedcom tag WILL */
-				I18N::translate('Will');
-		case 'WWW':
-			return
-				/* I18N: gedcom tag WWW (A web address / URL) */
-				I18N::translate('URL');
-		case '_ADOP_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Adoption of a son');
-			case 'F':
-				return I18N::translate('Adoption of a daughter');
-			default:
-				return I18N::translate('Adoption of a child');
-			}
-		case '_ADOP_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Adoption of a grandson');
-			case 'F':
-				return I18N::translate('Adoption of a granddaughter');
-			default:
-				return I18N::translate('Adoption of a grandchild');
-			}
-		case '_ADOP_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Adoption of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Adoption of a granddaughter');
-			default:
-				return I18N::translate('Adoption of a grandchild');
-			}
-		case '_ADOP_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Adoption of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Adoption of a granddaughter');
-			default:
-				return I18N::translate('Adoption of a grandchild');
-			}
-		case '_ADOP_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Adoption of a half-brother');
-			case 'F':
-				return I18N::translate('Adoption of a half-sister');
-			default:
-				return I18N::translate('Adoption of a half-sibling');
-			}
-		case '_ADOP_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Adoption of a brother');
-			case 'F':
-				return I18N::translate('Adoption of a sister');
-			default:
-				return I18N::translate('Adoption of a sibling');
-			}
-		case '_ADPF':
-			switch ($sex) {
-			case 'M':
-				return
-					/* I18N: gedcom tag _ADPF */
-					I18N::translateContext('MALE', 'Adopted by father');
-			case 'F':
-				return
-					/* I18N: gedcom tag _ADPF */
-					I18N::translateContext('FEMALE', 'Adopted by father');
-			default:
-				return
-					/* I18N: gedcom tag _ADPF */
-					I18N::translate('Adopted by father');
-			}
-		case '_ADPM':
-			switch ($sex) {
-			case 'M':
-				return
-					/* I18N: gedcom tag _ADPM */
-					I18N::translateContext('MALE', 'Adopted by mother');
-			case 'F':
-				return
-					/* I18N: gedcom tag _ADPM */
-					I18N::translateContext('FEMALE', 'Adopted by mother');
-			default:
-				return
-					/* I18N: gedcom tag _ADPM */
-					I18N::translate('Adopted by mother');
-			}
-		case '_AKA':
-		case '_AKAN':
-			switch ($sex) {
-			case 'M':
-				return
-					/* I18N: gedcom tag _AKA */
-					I18N::translateContext('MALE', 'Also known as');
-			case 'F':
-				return
-					/* I18N: gedcom tag _AKA */
-					I18N::translateContext('FEMALE', 'Also known as');
-			default:
-				return
-					/* I18N: gedcom tag _AKA */
-					I18N::translate('Also known as');
-			}
-		case '_ASSO':
-			return
-				/* I18N: gedcom tag _ASSO */
-				I18N::translate('Associate'); /* see also ASSO */
-		case '_BAPM_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Baptism of a son');
-			case 'F':
-				return I18N::translate('Baptism of a daughter');
-			default:
-				return I18N::translate('Baptism of a child');
-			}
-		case '_BAPM_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Baptism of a grandson');
-			case 'F':
-				return I18N::translate('Baptism of a granddaughter');
-			default:
-				return I18N::translate('Baptism of a grandchild');
-			}
-		case '_BAPM_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Baptism of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Baptism of a granddaughter');
-			default:
-				return I18N::translate('Baptism of a grandchild');
-			}
-		case '_BAPM_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Baptism of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Baptism of a granddaughter');
-			default:
-				return I18N::translate('Baptism of a grandchild');
-			}
-		case '_BAPM_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Baptism of a half-brother');
-			case 'F':
-				return I18N::translate('Baptism of a half-sister');
-			default:
-				return I18N::translate('Baptism of a half-sibling');
-			}
-		case '_BAPM_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Baptism of a brother');
-			case 'F':
-				return I18N::translate('Baptism of a sister');
-			default:
-				return I18N::translate('Baptism of a sibling');
-			}
-		case '_BIBL':
-			return
-				/* I18N: gedcom tag _BIBL */
-				I18N::translate('Bibliography');
-		case '_BIRT_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Birth of a son');
-			case 'F':
-				return I18N::translate('Birth of a daughter');
-			default:
-				return I18N::translate('Birth of a child');
-			}
-		case '_BIRT_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Birth of a grandson');
-			case 'F':
-				return I18N::translate('Birth of a granddaughter');
-			default:
-				return I18N::translate('Birth of a grandchild');
-			}
-		case '_BIRT_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Birth of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Birth of a granddaughter');
-			default:
-				return I18N::translate('Birth of a grandchild');
-			}
-		case '_BIRT_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Birth of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Birth of a granddaughter');
-			default:
-				return I18N::translate('Birth of a grandchild');
-			}
-		case '_BIRT_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Birth of a half-brother');
-			case 'F':
-				return I18N::translate('Birth of a half-sister');
-			default:
-				return I18N::translate('Birth of a half-sibling');
-			}
-		case '_BIRT_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Birth of a brother');
-			case 'F':
-				return I18N::translate('Birth of a sister');
-			default:
-				return I18N::translate('Birth of a sibling');
-			}
-		case '_BRTM':
-			return
-				/* I18N: gedcom tag _BRTM */
-				I18N::translate('Brit milah');
-		case '_BRTM:DATE':
-			return I18N::translate('Date of brit milah');
-		case '_BRTM:PLAC':
-			return I18N::translate('Place of brit milah');
-		case '_BURI_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a son');
-			case 'F':
-				return I18N::translate('Burial of a daughter');
-			default:
-				return I18N::translate('Burial of a child');
-			}
-		case '_BURI_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a grandson');
-			case 'F':
-				return I18N::translate('Burial of a granddaughter');
-			default:
-				return I18N::translate('Burial of a grandchild');
-			}
-		case '_BURI_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Burial of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Burial of a granddaughter');
-			default:
-				return I18N::translate('Burial of a grandchild');
-			}
-		case '_BURI_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Burial of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Burial of a granddaughter');
-			default:
-				return I18N::translate('Burial of a grandchild');
-			}
-		case '_BURI_GPAR':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a grandfather');
-			case 'F':
-				return I18N::translate('Burial of a grandmother');
-			default:
-				return I18N::translate('Burial of a grandparent');
-			}
-		case '_BURI_GPA1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a paternal grandfather');
-			case 'F':
-				return I18N::translate('Burial of a paternal grandmother');
-			default:
-				return I18N::translate('Burial of a paternal grandparent');
-			}
-		case '_BURI_GPA2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a maternal grandfather');
-			case 'F':
-				return I18N::translate('Burial of a maternal grandmother');
-			default:
-				return I18N::translate('Burial of a maternal grandparent');
-			}
-		case '_BURI_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a half-brother');
-			case 'F':
-				return I18N::translate('Burial of a half-sister');
-			default:
-				return I18N::translate('Burial of a half-sibling');
-			}
-		case '_BURI_PARE':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a father');
-			case 'F':
-				return I18N::translate('Burial of a mother');
-			default:
-				return I18N::translate('Burial of a parent');
-			}
-		case '_BURI_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a brother');
-			case 'F':
-				return I18N::translate('Burial of a sister');
-			default:
-				return I18N::translate('Burial of a sibling');
-			}
-		case '_BURI_SPOU':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Burial of a husband');
-			case 'F':
-				return I18N::translate('Burial of a wife');
-			default:
-				return I18N::translate('Burial of a spouse');
-			}
-		case '_CHR_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Christening of a son');
-			case 'F':
-				return I18N::translate('Christening of a daughter');
-			default:
-				return I18N::translate('Christening of a child');
-			}
-		case '_CHR_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Christening of a grandson');
-			case 'F':
-				return I18N::translate('Christening of a granddaughter');
-			default:
-				return I18N::translate('Christening of a grandchild');
-			}
-		case '_CHR_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Christening of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Christening of a granddaughter');
-			default:
-				return I18N::translate('Christening of a grandchild');
-			}
-		case '_CHR_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Christening of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Christening of a granddaughter');
-			default:
-				return I18N::translate('Christening of a grandchild');
-			}
-		case '_CHR_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Christening of a half-brother');
-			case 'F':
-				return I18N::translate('Christening of a half-sister');
-			default:
-				return I18N::translate('Christening of a half-sibling');
-			}
-		case '_CHR_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Christening of a brother');
-			case 'F':
-				return I18N::translate('Christening of a sister');
-			default:
-				return I18N::translate('Christening of a sibling');
-			}
-		case '_COML':
-			return
-				/* I18N: gedcom tag _COML */
-				I18N::translate('Common law marriage');
-		case '_CREM_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a son');
-			case 'F':
-				return I18N::translate('Cremation of a daughter');
-			default:
-				return I18N::translate('Cremation of a child');
-			}
-		case '_CREM_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a grandson');
-			case 'F':
-				return I18N::translate('Cremation of a granddaughter');
-			default:
-				return I18N::translate('Cremation of a grandchild');
-			}
-		case '_CREM_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Cremation of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Cremation of a granddaughter');
-			default:
-				return I18N::translate('Cremation of a grandchild');
-			}
-		case '_CREM_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Cremation of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Cremation of a granddaughter');
-			default:
-				return I18N::translate('Cremation of a grandchild');
-			}
-		case '_CREM_GPAR':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a grandfather');
-			case 'F':
-				return I18N::translate('Cremation of a grandmother');
-			default:
-				return I18N::translate('Cremation of a grand-parent');
-			}
-		case '_CREM_GPA1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a paternal grandfather');
-			case 'F':
-				return I18N::translate('Cremation of a paternal grandmother');
-			default:
-				return I18N::translate('Cremation of a grand-parent');
-			}
-		case '_CREM_GPA2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a maternal grandfather');
-			case 'F':
-				return I18N::translate('Cremation of a maternal grandmother');
-			default:
-				return I18N::translate('Cremation of a grand-parent');
-			}
-		case '_CREM_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a half-brother');
-			case 'F':
-				return I18N::translate('Cremation of a half-sister');
-			default:
-				return I18N::translate('Cremation of a half-sibling');
-			}
-		case '_CREM_PARE':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a father');
-			case 'F':
-				return I18N::translate('Cremation of a mother');
-			default:
-				return I18N::translate('Cremation of a parent');
-			}
-		case '_CREM_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a brother');
-			case 'F':
-				return I18N::translate('Cremation of a sister');
-			default:
-				return I18N::translate('Cremation of a sibling');
-			}
-		case '_CREM_SPOU':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Cremation of a husband');
-			case 'F':
-				return I18N::translate('Cremation of a wife');
-			default:
-				return I18N::translate('Cremation of a spouse');
-			}
-		case '_DBID':
-			return
-				/* I18N: gedcom tag _DBID */
-				I18N::translate('Linked database ID');
-		case '_DEAT_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a son');
-			case 'F':
-				return I18N::translate('Death of a daughter');
-			default:
-				return I18N::translate('Death of a child');
-			}
-		case '_DEAT_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a grandson');
-			case 'F':
-				return I18N::translate('Death of a granddaughter');
-			default:
-				return I18N::translate('Death of a grandchild');
-			}
-		case '_DEAT_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Death of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Death of a granddaughter');
-			default:
-				return I18N::translate('Death of a grandchild');
-			}
-		case '_DEAT_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Death of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Death of a granddaughter');
-			default:
-				return I18N::translate('Death of a grandchild');
-			}
-		case '_DEAT_GPAR':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a grandfather');
-			case 'F':
-				return I18N::translate('Death of a grandmother');
-			default:
-				return I18N::translate('Death of a grand-parent');
-			}
-		case '_DEAT_GPA1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a paternal grandfather');
-			case 'F':
-				return I18N::translate('Death of a paternal grandmother');
-			default:
-				return I18N::translate('Death of a grand-parent');
-			}
-		case '_DEAT_GPA2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a maternal grandfather');
-			case 'F':
-				return I18N::translate('Death of a maternal grandmother');
-			default:
-				return I18N::translate('Death of a grand-parent');
-			}
-		case '_DEAT_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a half-brother');
-			case 'F':
-				return I18N::translate('Death of a half-sister');
-			default:
-				return I18N::translate('Death of a half-sibling');
-			}
-		case '_DEAT_PARE':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a father');
-			case 'F':
-				return I18N::translate('Death of a mother');
-			default:
-				return I18N::translate('Death of a parent');
-			}
-		case '_DEAT_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a brother');
-			case 'F':
-				return I18N::translate('Death of a sister');
-			default:
-				return I18N::translate('Death of a sibling');
-			}
-		case '_DEAT_SPOU':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Death of a husband');
-			case 'F':
-				return I18N::translate('Death of a wife');
-			default:
-				return I18N::translate('Death of a spouse');
-			}
-		case '_DEG':
-			return
-				/* I18N: gedcom tag _DEG */
-				I18N::translate('Degree');
-		case '_DETS':
-			return
-				/* I18N: gedcom tag _DETS */
-				I18N::translate('Death of one spouse');
-		case '_DNA':
-			return
-				/* I18N: gedcom tag _DNA (from FTM 2010) */
-				I18N::translate('DNA markers');
-		case '_EMAIL':
-			return
-				/* I18N: gedcom tag _EMAIL */
-				I18N::translate('Email address');
-		case '_EYEC':
-			return
-				/* I18N: gedcom tag _EYEC */
-				I18N::translate('Eye color');
-		case '_FA1':
-			return I18N::translate('Fact 1');
-		case '_FA2':
-			return I18N::translate('Fact 2');
-		case '_FA3':
-			return I18N::translate('Fact 3');
-		case '_FA4':
-			return I18N::translate('Fact 4');
-		case '_FA5':
-			return I18N::translate('Fact 5');
-		case '_FA6':
-			return I18N::translate('Fact 6');
-		case '_FA7':
-			return I18N::translate('Fact 7');
-		case '_FA8':
-			return I18N::translate('Fact 8');
-		case '_FA9':
-			return I18N::translate('Fact 9');
-		case '_FA10':
-			return I18N::translate('Fact 10');
-		case '_FA11':
-			return I18N::translate('Fact 11');
-		case '_FA12':
-			return I18N::translate('Fact 12');
-		case '_FA13':
-			return I18N::translate('Fact 13');
-		case '_FNRL':
-			return
-				/* I18N: gedcom tag _FNRL */
-				I18N::translate('Funeral');
-		case '_FREL':
-			return
-				/* I18N: gedcom tag _FREL */
-				I18N::translate('Relationship to father');
-		case '_GEDF':
-			return
-				/* I18N: gedcom tag _GEDF */
-				I18N::translate('GEDCOM file');
-		case '_GODP':
-			return
-				/* I18N: gedcom tag _GODP */
-				I18N::translate('Godparent');
-		case '_HAIR':
-			return
-				/* I18N: gedcom tag _HAIR */
-				I18N::translate('Hair color');
-		case '_HEB':
-			return
-				/* I18N: gedcom tag _HEB */
-				I18N::translate('Hebrew');
-		case '_HEIG':
-			return
-				/* I18N: gedcom tag _HEIG */
-				I18N::translate('Height');
-		case '_HNM':
-			return
-				/* I18N: gedcom tag _HNM */
-				I18N::translate('Hebrew name');
-		case '_HOL':
-			return
-				/* I18N: gedcom tag _HOL */
-				I18N::translate('Holocaust');
-		case '_INTE':
-			switch ($sex) {
-			case 'M':
-				return
-					/* I18N: gedcom tag _INTE */
-					I18N::translateContext('MALE', 'Interred');
-			case 'F':
-				return
-					/* I18N: gedcom tag _INTE */
-					I18N::translateContext('FEMALE', 'Interred');
-			default:
-				return
-					/* I18N: gedcom tag _INTE */
-					I18N::translate('Interred');
-			}
-		case '_LOC':
-			return
-				/* I18N: gedcom tag _LOC */
-				I18N::translate('Location');
-		case '_MARI':
-			return
-				/* I18N: gedcom tag _MARI */
-				I18N::translate('Marriage intention');
-		case '_MARNM':
-			return
-				/* I18N: gedcom tag _MARNM */
-				I18N::translate('Married name');
-		case '_PRIM':
-			return
-				/* I18N: gedcom tag _PRIM */
-				I18N::translate('Highlighted image');
-		case '_MARNM_SURN':
-			return I18N::translate('Married surname');
-		case '_MARR_CHIL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Marriage of a son');
-			case 'F':
-				return I18N::translate('Marriage of a daughter');
-			default:
-				return I18N::translate('Marriage of a child');
-			}
-		case '_MARR_FAMC':
-			return
-				/* I18N: ...to each other */
-				I18N::translate('Marriage of parents');
-		case '_MARR_GCHI':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Marriage of a grandson');
-			case 'F':
-				return I18N::translate('Marriage of a granddaughter');
-			default:
-				return I18N::translate('Marriage of a grandchild');
-			}
-		case '_MARR_GCH1':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('daughter’s son', 'Marriage of a grandson');
-			case 'F':
-				return I18N::translateContext('daughter’s daughter', 'Marriage of a granddaughter');
-			default:
-				return I18N::translate('Marriage of a grandchild');
-			}
-		case '_MARR_GCH2':
-			switch ($sex) {
-			case 'M':
-				return I18N::translateContext('son’s son', 'Marriage of a grandson');
-			case 'F':
-				return I18N::translateContext('son’s daughter', 'Marriage of a granddaughter');
-			default:
-				return I18N::translate('Marriage of a grandchild');
-			}
-		case '_MARR_HSIB':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Marriage of a half-brother');
-			case 'F':
-				return I18N::translate('Marriage of a half-sister');
-			default:
-				return I18N::translate('Marriage of a half-sibling');
-			}
-		case '_MARR_PARE':
-			switch ($sex) {
-			case 'M':
-				return
-					/* I18N: ...to another spouse */
-					I18N::translate('Marriage of a father');
-			case 'F':
-				return
-					/* I18N: ...to another spouse */
-					I18N::translate('Marriage of a mother');
-			default:
-				return
-					/* I18N: ...to another spouse */
-					I18N::translate('Marriage of a parent');
-			}
-		case '_MARR_SIBL':
-			switch ($sex) {
-			case 'M':
-				return I18N::translate('Marriage of a brother');
-			case 'F':
-				return I18N::translate('Marriage of a sister');
-			default:
-				return I18N::translate('Marriage of a sibling');
-			}
-		case '_MBON':
-			return
-				/* I18N: gedcom tag _MBON */
-				I18N::translate('Marriage bond');
-		case '_MDCL':
-			return
-				/* I18N: gedcom tag _MDCL */
-				I18N::translate('Medical');
-		case '_MEDC':
-			return
-				/* I18N: gedcom tag _MEDC */
-				I18N::translate('Medical condition');
-		case '_MEND':
-			return
-				/* I18N: gedcom tag _MEND */
-				I18N::translate('Marriage ending status');
-		case '_MILI':
-			return
-				/* I18N: gedcom tag _MILI */
-				I18N::translate('Military');
-		case '_MILT':
-			return
-				/* I18N: gedcom tag _MILT */
-				I18N::translate('Military service');
-		case '_MREL':
-			return
-				/* I18N: gedcom tag _MREL */
-				I18N::translate('Relationship to mother');
-		case '_MSTAT':
-			return
-				/* I18N: gedcom tag _MSTAT */
-				I18N::translate('Marriage beginning status');
-		case '_NAME':
-			return
-				/* I18N: gedcom tag _NAME */
-				I18N::translate('Mailing name');
-		case '_NAMS':
-			return
-				/* I18N: gedcom tag _NAMS */
-				I18N::translate('Namesake');
-		case '_NLIV':
-			return
-				/* I18N: gedcom tag _NLIV */
-				I18N::translate('Not living');
-		case '_NMAR':
-			switch ($sex) {
-			case 'M':
-				return
-					/* I18N: gedcom tag _NMAR */
-					I18N::translateContext('MALE', 'Never married');
-			case 'F':
-				return
-					/* I18N: gedcom tag _NMAR */
-					I18N::translateContext('FEMALE', 'Never married');
-			default:
-				return
-					/* I18N: gedcom tag _NMAR */
-					I18N::translate('Never married');
-			}
-		case '_NMR':
-			switch ($sex) {
-			case 'M':
-				return
-					/* I18N: gedcom tag _NMR */
-					I18N::translateContext('MALE', 'Not married');
-			case 'F':
-				return
-					/* I18N: gedcom tag _NMR */
-					I18N::translateContext('FEMALE', 'Not married');
-			default:
-				return
-					/* I18N: gedcom tag _NMR */
-					I18N::translate('Not married');
-			}
-		case '_WT_USER':
-			return I18N::translate('by');
-		case '_PRMN':
-			return
-				/* I18N: gedcom tag _PRMN */
-				I18N::translate('Permanent number');
-		case '_SCBK':
-			return
-				/* I18N: gedcom tag _SCBK */
-				I18N::translate('Scrapbook');
-		case '_SEPR':
-			return
-				/* I18N: gedcom tag _SEPR */
-				I18N::translate('Separated');
-		case '_SSHOW':
-			return
-				/* I18N: gedcom tag _SSHOW */
-				I18N::translate('Slide show');
-		case '_STAT':
-			return
-				/* I18N: gedcom tag _STAT */
-				I18N::translate('Marriage status');
-		case '_SUBQ':
-			return
-				/* I18N: gedcom tag _SUBQ */
-				I18N::translate('Short version');
-		case '_TODO':
-			return
-				/* I18N: gedcom tag _TODO */
-				I18N::translate('Research task');
-		case '_TYPE':
-			return
-				/* I18N: gedcom tag _TYPE */
-				I18N::translate('Media type');
-		case '_UID':
-			return
-				/* I18N: gedcom tag _UID */
-				I18N::translate('Unique identifier');
-		case '_URL':
-			return
-				/* I18N: gedcom tag _URL */
-				I18N::translate('URL');
-		case '_WEIG':
-			return
-				/* I18N: gedcom tag _WEIG */
-				I18N::translate('Weight');
-		case '_WITN':
-			return
-				/* I18N: gedcom tag _WITN */
-				I18N::translate('Witness');
-		case '_WT_OBJE_SORT':
-			return
-				/* I18N: gedcom tag _WT_OBJE_SORT */
-				I18N::translate('Re-order media');
-		case '_YART':
-			return /* I18N: gedcom tag _YART - A yahrzeit is a special anniversary of death in the Hebrew faith/calendar. */ I18N::translate('Yahrzeit');
-			// Brit milah applies only to males, no need for male/female translations
-		case '__BRTM_CHIL':
-			return I18N::translate('Brit milah of a son');
-		case '__BRTM_GCHI':
-			return I18N::translate('Brit milah of a grandson');
-		case '__BRTM_GCH1':
-			return I18N::translateContext('daughter’s son', 'Brit milah of a grandson');
-		case '__BRTM_GCH2':
-			return I18N::translateContext('son’s son', 'Brit milah of a grandson');
-		case '__BRTM_HSIB':
-			return I18N::translate('Brit milah of a half-brother');
-		case '__BRTM_SIBL':
-			return I18N::translate('Brit milah of a brother');
-			// These "pseudo" tags are generated internally to present information about a media object
-		case '__FILE_SIZE__':
-			return I18N::translate('File size');
-		case '__IMAGE_SIZE__':
-			return I18N::translate('Image dimensions');
-		default:
-			// If no specialisation exists (e.g. DEAT:CAUS), then look for the general (CAUS)
-			if (strpos($tag, ':')) {
-				list(, $tag) = explode(':', $tag, 2);
+		    case 'ABBR':
+			    return
+				    /* I18N: gedcom tag ABBR */
+				    I18N::translate('Abbreviation');
+		    case 'ADDR':
+			    return
+				    /* I18N: gedcom tag ADDR */
+				    I18N::translate('Address');
+		    case 'ADR1':
+			    return I18N::translate('Address line 1');
+		    case 'ADR2':
+			    return I18N::translate('Address line 2');
+		    case 'ADOP':
+			    return
+				    /* I18N: gedcom tag ADOP */
+				    I18N::translate('Adoption');
+		    case 'ADOP:DATE':
+			    return I18N::translate('Date of adoption');
+		    case 'ADOP:PLAC':
+			    return I18N::translate('Place of adoption');
+		    case 'AFN':
+			    return
+				    /* I18N: gedcom tag AFN */
+				    I18N::translate('Ancestral file number');
+		    case 'AGE':
+			    return
+				    /* I18N: gedcom tag AGE */
+				    I18N::translate('Age');
+		    case 'AGNC':
+			    return
+				    /* I18N: gedcom tag AGNC */
+				    I18N::translate('Agency');
+		    case 'ALIA':
+			    return
+				    /* I18N: gedcom tag ALIA */
+				    I18N::translate('Alias');
+		    case 'ANCE':
+			    return
+				    /* I18N: gedcom tag ANCE */
+				    I18N::translate('Generations of ancestors');
+		    case 'ANCI':
+			    return
+				    /* I18N: gedcom tag ANCI */
+				    I18N::translate('Ancestors interest');
+		    case 'ANUL':
+			    return
+				    /* I18N: gedcom tag ANUL */
+				    I18N::translate('Annulment');
+		    case 'ASSO':
+			    return
+				    /* I18N: gedcom tag ASSO */
+				    I18N::translate('Associate'); /* see also _ASSO */
+		    case 'AUTH':
+			    return
+				    /* I18N: gedcom tag AUTH */
+				    I18N::translate('Author');
+		    case 'BAPL':
+			    return
+				    /* I18N: gedcom tag BAPL. LDS = Church of Latter Day Saints. */
+				    I18N::translate('LDS baptism');
+		    case 'BAPL:DATE':
+			    return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS baptism');
+		    case 'BAPL:PLAC':
+			    return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS baptism');
+		    case 'BAPM':
+			    return
+				    /* I18N: gedcom tag BAPM */
+				    I18N::translate('Baptism');
+		    case 'BAPM:DATE':
+			    return I18N::translate('Date of baptism');
+		    case 'BAPM:PLAC':
+			    return I18N::translate('Place of baptism');
+		    case 'BARM':
+			    return
+				    /* I18N: gedcom tag BARM */
+				    I18N::translate('Bar mitzvah');
+		    case 'BARM:DATE':
+			    return I18N::translate('Date of bar mitzvah');
+		    case 'BARM:PLAC':
+			    return I18N::translate('Place of bar mitzvah');
+		    case 'BASM':
+			    return
+				    /* I18N: gedcom tag BASM */
+				    I18N::translate('Bat mitzvah');
+		    case 'BASM:DATE':
+			    return I18N::translate('Date of bat mitzvah');
+		    case 'BASM:PLAC':
+			    return I18N::translate('Place of bat mitzvah');
+		    case 'BIRT':
+			    return
+				    /* I18N: gedcom tag BIRT */
+				    I18N::translate('Birth');
+		    case 'BIRT:DATE':
+			    return I18N::translate('Date of birth');
+		    case 'BIRT:PLAC':
+			    return I18N::translate('Place of birth');
+		    case 'BLES':
+			    return
+				    /* I18N: gedcom tag BLES */
+				    I18N::translate('Blessing');
+		    case 'BLES:DATE':
+			    return I18N::translate('Date of blessing');
+		    case 'BLES:PLAC':
+			    return I18N::translate('Place of blessing');
+		    case 'BLOB':
+			    return
+				    /* I18N: gedcom tag BLOB */
+				    I18N::translate('Binary data object');
+		    case 'BURI':
+			    return
+				    /* I18N: gedcom tag BURI */
+				    I18N::translate('Burial');
+		    case 'BURI:DATE':
+			    return I18N::translate('Date of burial');
+		    case 'BURI:PLAC':
+			    return I18N::translate('Place of burial');
+		    case 'CALN':
+			    return
+				    /* I18N: gedcom tag CALN */
+				    I18N::translate('Call number');
+		    case 'CAST':
+			    return
+				    /* I18N: gedcom tag CAST */
+				    I18N::translate('Caste');
+		    case 'CAUS':
+			    return
+				    /* I18N: gedcom tag CAUS */
+				    I18N::translate('Cause');
+		    case 'CEME':
+			    return
+				    /* I18N: gedcom tag CEME */
+				    I18N::translate('Cemetery');
+		    case 'CENS':
+			    return
+				    /* I18N: gedcom tag CENS */
+				    I18N::translate('Census');
+		    case 'CENS:DATE':
+			    return I18N::translate('Census date');
+		    case 'CENS:PLAC':
+			    return I18N::translate('Census place');
+		    case 'CHAN':
+			    return
+				    /* I18N: gedcom tag CHAN */
+				    I18N::translate('Last change');
+		    case 'CHAN:DATE':
+			    return
+				    /* I18N: gedcom tag CHAN:DATE */
+				    I18N::translate('Date of last change');
+		    case 'CHAN:_WT_USER':
+			    return
+				    /* I18N: gedcom tag CHAN:_WT_USER */
+				    I18N::translate('Author of last change');
+		    case 'CHAR':
+			    return
+				    /* I18N: gedcom tag CHAR */
+				    I18N::translate('Character set');
+		    case 'CHIL':
+			    return
+				    /* I18N: gedcom tag CHIL */
+				    I18N::translate('Child');
+		    case 'CHR':
+			    return
+				    /* I18N: gedcom tag CHR */
+				    I18N::translate('Christening');
+		    case 'CHR:DATE':
+			    return I18N::translate('Date of christening');
+		    case 'CHR:PLAC':
+			    return I18N::translate('Place of christening');
+		    case 'CHRA':
+			    return
+				    /* I18N: gedcom tag CHRA */
+				    I18N::translate('Adult christening');
+		    case 'CITN':
+			    return
+				    /* I18N: gedcom tag CITN */
+				    I18N::translate('Citizenship');
+		    case 'CITY':
+			    return
+				    /* I18N: gedcom tag CITY */
+				    I18N::translate('City');
+		    case 'COMM':
+			    return
+				    /* I18N: gedcom tag COMM */
+				    I18N::translate('Comment');
+		    case 'CONC':
+			    return
+				    /* I18N: gedcom tag CONC */
+				    I18N::translate('Concatenation');
+		    case 'CONT':
+			    return
+				    /* I18N: gedcom tag CONT */
+				    I18N::translate('Continued');
+		    case 'CONF':
+			    return
+				    /* I18N: gedcom tag CONF */
+				    I18N::translate('Confirmation');
+		    case 'CONF:DATE':
+			    return I18N::translate('Date of confirmation');
+		    case 'CONF:PLAC':
+			    return I18N::translate('Place of confirmation');
+		    case 'CONL':
+			    return
+				    /* I18N: gedcom tag CONL. LDS = Church of Latter Day Saints. */
+				    I18N::translate('LDS confirmation');
+		    case 'COPR':
+			    return
+				    /* I18N: gedcom tag COPR */
+				    I18N::translate('Copyright');
+		    case 'CORP':
+			    return
+				    /* I18N: gedcom tag CORP */
+				    I18N::translate('Corporation');
+		    case 'CREM':
+			    return
+				    /* I18N: gedcom tag CREM */
+				    I18N::translate('Cremation');
+		    case 'CREM:DATE':
+			    return I18N::translate('Date of cremation');
+		    case 'CREM:PLAC':
+			    return I18N::translate('Place of cremation');
+		    case 'CTRY':
+			    return
+				    /* I18N: gedcom tag CTRY */
+				    I18N::translate('Country');
+		    case 'DATA':
+			    return
+				    /* I18N: gedcom tag DATA */
+				    I18N::translate('Data');
+		    case 'DATA:DATE':
+			    return I18N::translate('Date of entry in original source');
+		    case 'DATE':
+			    return
+				    /* I18N: gedcom tag DATE */
+				    I18N::translate('Date');
+		    case 'DEAT':
+			    return
+				    /* I18N: gedcom tag DEAT */
+				    I18N::translate('Death');
+		    case 'DEAT:CAUS':
+			    return I18N::translate('Cause of death');
+		    case 'DEAT:DATE':
+			    return I18N::translate('Date of death');
+		    case 'DEAT:PLAC':
+			    return I18N::translate('Place of death');
+		    case 'DESC':
+			    return
+				    /* I18N: gedcom tag DESC */
+				    I18N::translate('Descendants');
+		    case 'DESI':
+			    return
+				    /* I18N: gedcom tag DESI */
+				    I18N::translate('Descendants interest');
+		    case 'DEST':
+			    return
+				    /* I18N: gedcom tag DEST */
+				    I18N::translate('Destination');
+		    case 'DIV':
+			    return
+				    /* I18N: gedcom tag DIV */
+				    I18N::translate('Divorce');
+		    case 'DIVF':
+			    return
+				    /* I18N: gedcom tag DIVF */
+				    I18N::translate('Divorce filed');
+		    case 'DSCR':
+			    return
+				    /* I18N: gedcom tag DSCR */
+				    I18N::translate('Description');
+		    case 'EDUC':
+			    return
+				    /* I18N: gedcom tag EDUC */
+				    I18N::translate('Education');
+		    case 'EDUC:AGNC':
+			    return I18N::translate('School or college');
+		    case 'EMAI':
+			    return
+				    /* I18N: gedcom tag EMAI */
+				    I18N::translate('Email address');
+		    case 'EMAIL':
+			    return
+				    /* I18N: gedcom tag EMAIL */
+				    I18N::translate('Email address');
+		    case 'EMAL':
+			    return
+				    /* I18N: gedcom tag EMAL */
+				    I18N::translate('Email address');
+		    case 'EMIG':
+			    return
+				    /* I18N: gedcom tag EMIG */
+				    I18N::translate('Emigration');
+		    case 'EMIG:DATE':
+			    return I18N::translate('Date of emigration');
+		    case 'EMIG:PLAC':
+			    return I18N::translate('Place of emigration');
+		    case 'ENDL':
+			    return
+				    /* I18N: gedcom tag ENDL. LDS = Church of Latter Day Saints. */
+				    I18N::translate('LDS endowment');
+		    case 'ENDL:DATE':
+			    return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS endowment');
+		    case 'ENDL:PLAC':
+			    return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS endowment');
+		    case 'ENGA':
+			    return
+				    /* I18N: gedcom tag ENGA */
+				    I18N::translate('Engagement');
+		    case 'ENGA:DATE':
+			    return I18N::translate('Date of engagement');
+		    case 'ENGA:PLAC':
+			    return I18N::translate('Place of engagement');
+		    case 'EVEN':
+			    return
+				    /* I18N: gedcom tag EVEN */
+				    I18N::translate('Event');
+		    case 'EVEN:DATE':
+			    return I18N::translate('Date of event');
+		    case 'EVEN:PLAC':
+			    return I18N::translate('Place of event');
+		    case 'EVEN:TYPE':
+			    return I18N::translate('Type of event');
+		    case 'FACT':
+			    return
+				    /* I18N: gedcom tag FACT */
+				    I18N::translate('Fact');
+		    case 'FACT:TYPE':
+			    return I18N::translate('Type of fact');
+		    case 'FAM':
+			    return
+				    /* I18N: gedcom tag FAM */
+				    I18N::translate('Family');
+		    case 'FAMC':
+			    return
+				    /* I18N: gedcom tag FAMC */
+				    I18N::translate('Family as a child');
+		    case 'FAMF':
+			    return
+				    /* I18N: gedcom tag FAMF */
+				    I18N::translate('Family file');
+		    case 'FAMS':
+			    return
+				    /* I18N: gedcom tag FAMS */
+				    I18N::translate('Family as a spouse');
+		    case 'FAMS:CENS:DATE':
+			    return I18N::translate('Spouse census date');
+		    case 'FAMS:CENS:PLAC':
+			    return I18N::translate('Spouse census place');
+		    case 'FAMS:DIV:DATE':
+			    return I18N::translate('Date of divorce');
+		    case 'FAMS:MARR:DATE':
+			    return I18N::translate('Date of marriage');
+		    case 'FAMS:MARR:PLAC':
+			    return I18N::translate('Place of marriage');
+		    case 'FAMS:NOTE':
+			    return I18N::translate('Spouse note');
+		    case 'FAMS:SLGS:DATE':
+			    return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS spouse sealing');
+		    case 'FAMS:SLGS:PLAC':
+			    return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS spouse sealing');
+		    case 'FAX':
+			    return
+				    /* I18N: gedcom tag FAX */
+				    I18N::translate('Fax');
+		    case 'FCOM':
+			    return
+				    /* I18N: gedcom tag FCOM */
+				    I18N::translate('First communion');
+		    case 'FCOM:DATE':
+			    return I18N::translate('Date of first communion');
+		    case 'FCOM:PLAC':
+			    return I18N::translate('Place of first communion');
+		    case 'FILE':
+			    return
+				    /* I18N: gedcom tag FILE */
+				    I18N::translate('Filename');
+		    case 'FONE':
+			    return
+				    /* I18N: gedcom tag FONE */
+				    I18N::translate('Phonetic');
+		    case 'FORM':
+			    return
+				    /* I18N: gedcom tag FORM */
+				    I18N::translate('Format');
+		    case 'GEDC':
+			    return
+				    /* I18N: gedcom tag GEDC */
+				    I18N::translate('GEDCOM file');
+		    case 'GIVN':
+			    return
+				    /* I18N: gedcom tag GIVN */
+				    I18N::translate('Given names');
+		    case 'GRAD':
+			    return
+				    /* I18N: gedcom tag GRAD */
+				    I18N::translate('Graduation');
+		    case 'HEAD':
+			    return
+				    /* I18N: gedcom tag HEAD */
+				    I18N::translate('Header');
+		    case 'HUSB':
+			    return
+				    /* I18N: gedcom tag HUSB */
+				    I18N::translate('Husband');
+		    case 'IDNO':
+			    return
+				    /* I18N: gedcom tag IDNO */
+				    I18N::translate('Identification number');
+		    case 'IMMI':
+			    return
+				    /* I18N: gedcom tag IMMI */
+				    I18N::translate('Immigration');
+		    case 'IMMI:DATE':
+			    return I18N::translate('Date of immigration');
+		    case 'IMMI:PLAC':
+			    return I18N::translate('Place of immigration');
+		    case 'INDI':
+			    return
+				    /* I18N: gedcom tag INDI */
+				    I18N::translate('Individual');
+		    case 'INFL':
+			    return
+				    /* I18N: gedcom tag INFL */
+				    I18N::translate('Infant');
+		    case 'LANG':
+			    return
+				    /* I18N: gedcom tag LANG */
+				    I18N::translate('Language');
+		    case 'LATI':
+			    return
+				    /* I18N: gedcom tag LATI */
+				    I18N::translate('Latitude');
+		    case 'LEGA':
+			    return
+				    /* I18N: gedcom tag LEGA */
+				    I18N::translate('Legatee');
+		    case 'LONG':
+			    return
+				    /* I18N: gedcom tag LONG */
+				    I18N::translate('Longitude');
+		    case 'MAP':
+			    return
+				    /* I18N: gedcom tag MAP */
+				    I18N::translate('Map');
+		    case 'MARB':
+			    return
+				    /* I18N: gedcom tag MARB */
+				    I18N::translate('Marriage banns');
+		    case 'MARB:DATE':
+			    return I18N::translate('Date of marriage banns');
+		    case 'MARB:PLAC':
+			    return I18N::translate('Place of marriage banns');
+		    case 'MARC':
+			    return
+				    /* I18N: gedcom tag MARC */
+				    I18N::translate('Marriage contract');
+		    case 'MARL':
+			    return
+				    /* I18N: gedcom tag MARL */
+				    I18N::translate('Marriage license');
+		    case 'MARR':
+			    return
+				    /* I18N: gedcom tag MARR */
+				    I18N::translate('Marriage');
+		    case 'MARR:DATE':
+			    return I18N::translate('Date of marriage');
+		    case 'MARR:PLAC':
+			    return I18N::translate('Place of marriage');
+		    case 'MARR_CIVIL':
+			    return I18N::translate('Civil marriage');
+		    case 'MARR_PARTNERS':
+			    return I18N::translate('Registered partnership');
+		    case 'MARR_RELIGIOUS':
+			    return I18N::translate('Religious marriage');
+		    case 'MARR_UNKNOWN':
+			    return I18N::translate('Marriage type unknown');
+		    case 'MARS':
+			    return
+				    /* I18N: gedcom tag MARS */
+				    I18N::translate('Marriage settlement');
+		    case 'MEDI':
+			    return
+				    /* I18N: gedcom tag MEDI */
+				    I18N::translate('Media type');
+		    case 'NAME':
+			    if ($record instanceof Repository) {
+				    return
+					    /* I18N: gedcom tag REPO:NAME */
+					    I18N::translateContext('Repository', 'Name');
+			    } else {
+				    return
+					    /* I18N: gedcom tag NAME */
+					    I18N::translate('Name');
+			    }
+		    case 'NAME:FONE':
+			    return I18N::translate('Phonetic name');
+		    case 'NAME:_HEB':
+			    return I18N::translate('Name in Hebrew');
+		    case 'NATI':
+			    return
+				    /* I18N: gedcom tag NATI */
+				    I18N::translate('Nationality');
+		    case 'NATU':
+			    return
+				    /* I18N: gedcom tag NATU */
+				    I18N::translate('Naturalization');
+		    case 'NATU:DATE':
+			    return I18N::translate('Date of naturalization');
+		    case 'NATU:PLAC':
+			    return I18N::translate('Place of naturalization');
+		    case 'NCHI':
+			    return
+				    /* I18N: gedcom tag NCHI */
+				    I18N::translate('Number of children');
+		    case 'NICK':
+			    return
+				    /* I18N: gedcom tag NICK */
+				    I18N::translate('Nickname');
+		    case 'NMR':
+			    return
+				    /* I18N: gedcom tag NMR */
+				    I18N::translate('Number of marriages');
+		    case 'NOTE':
+			    return
+				    /* I18N: gedcom tag NOTE */
+				    I18N::translate('Note');
+		    case 'NPFX':
+			    return
+				    /* I18N: gedcom tag NPFX */
+				    I18N::translate('Name prefix');
+		    case 'NSFX':
+			    return
+				    /* I18N: gedcom tag NSFX */
+				    I18N::translate('Name suffix');
+		    case 'OBJE':
+			    return
+				    /* I18N: gedcom tag OBJE */
+				    I18N::translate('Media object');
+		    case 'OCCU':
+			    return
+				    /* I18N: gedcom tag OCCU */
+				    I18N::translate('Occupation');
+		    case 'OCCU:AGNC':
+			    return I18N::translate('Employer');
+		    case 'ORDI':
+			    return
+				    /* I18N: gedcom tag ORDI */
+				    I18N::translate('Ordinance');
+		    case 'ORDN':
+			    return
+				    /* I18N: gedcom tag ORDN */
+				    I18N::translate('Ordination');
+		    case 'ORDN:AGNC':
+			    return I18N::translate('Religious institution');
+		    case 'ORDN:DATE':
+			    return I18N::translate('Date of ordination');
+		    case 'ORDN:PLAC':
+			    return I18N::translate('Place of ordination');
+		    case 'PAGE':
+			    return
+				    /* I18N: gedcom tag PAGE */
+				    I18N::translate('Citation details');
+		    case 'PEDI':
+			    return
+				    /* I18N: gedcom tag PEDI */
+				    I18N::translate('Relationship to parents');
+		    case 'PHON':
+			    return
+				    /* I18N: gedcom tag PHON */
+				    I18N::translate('Phone');
+		    case 'PLAC':
+			    return
+				    /* I18N: gedcom tag PLAC */
+				    I18N::translate('Place');
+		    case 'PLAC:FONE':
+			    return I18N::translate('Phonetic place');
+		    case 'PLAC:ROMN':
+			    return I18N::translate('Romanized place');
+		    case 'PLAC:_HEB':
+			    return I18N::translate('Place in Hebrew');
+		    case 'POST':
+			    return
+				    /* I18N: gedcom tag POST */
+				    I18N::translate('Postal code');
+		    case 'PROB':
+			    return
+				    /* I18N: gedcom tag PROB */
+				    I18N::translate('Probate');
+		    case 'PROP':
+			    return
+				    /* I18N: gedcom tag PROP */
+				    I18N::translate('Property');
+		    case 'PUBL':
+			    return
+				    /* I18N: gedcom tag PUBL */
+				    I18N::translate('Publication');
+		    case 'QUAY':
+			    return
+				    /* I18N: gedcom tag QUAY */
+				    I18N::translate('Quality of data');
+		    case 'REFN':
+			    return
+				    /* I18N: gedcom tag REFN */
+				    I18N::translate('Reference number');
+		    case 'RELA':
+			    return
+				    /* I18N: gedcom tag RELA */
+				    I18N::translate('Relationship');
+		    case 'RELI':
+			    return
+				    /* I18N: gedcom tag RELI */
+				    I18N::translate('Religion');
+		    case 'REPO':
+			    return
+				    /* I18N: gedcom tag REPO */
+				    I18N::translate('Repository');
+		    case 'RESI':
+			    return
+				    /* I18N: gedcom tag RESI */
+				    I18N::translate('Residence');
+		    case 'RESI:DATE':
+			    return I18N::translate('Date of residence');
+		    case 'RESI:PLAC':
+			    return I18N::translate('Place of residence');
+		    case 'RESN':
+			    return
+				    /* I18N: gedcom tag RESN */
+				    I18N::translate('Restriction');
+		    case 'RETI':
+			    return
+				    /* I18N: gedcom tag RETI */
+				    I18N::translate('Retirement');
+		    case 'RETI:AGNC':
+			    return I18N::translate('Employer');
+		    case 'RFN':
+			    return
+				    /* I18N: gedcom tag RFN */
+				    I18N::translate('Record file number');
+		    case 'RIN':
+			    return
+				    /* I18N: gedcom tag RIN */
+				    I18N::translate('Record ID number');
+		    case 'ROLE':
+			    return
+				    /* I18N: gedcom tag ROLE */
+				    I18N::translate('Role');
+		    case 'ROMN':
+			    return
+				    /* I18N: gedcom tag ROMN */
+				    I18N::translate('Romanized');
+		    case 'SERV':
+			    return
+				    /* I18N: gedcom tag SERV */
+				    I18N::translate('Remote server');
+		    case 'SEX':
+			    return
+				    /* I18N: gedcom tag SEX */
+				    I18N::translate('Gender');
+		    case 'SHARED_NOTE':
+			    return I18N::translate('Shared note');
+		    case 'SLGC':
+			    return
+				    /* I18N: gedcom tag SLGC. LDS = Church of Latter Day Saints. */
+				    I18N::translate('LDS child sealing');
+		    case 'SLGC:DATE':
+			    return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Date of LDS child sealing');
+		    case 'SLGC:PLAC':
+			    return /* I18N: LDS = Church of Latter Day Saints. */ I18N::translate('Place of LDS child sealing');
+		    case 'SLGS':
+			    return
+				    /* I18N: gedcom tag SLGS. LDS = Church of Latter Day Saints. */
+				    I18N::translate('LDS spouse sealing');
+		    case 'SOUR':
+			    return
+				    /* I18N: gedcom tag SOUR */
+				    I18N::translate('Source');
+		    case 'SPFX':
+			    return
+				    /* I18N: gedcom tag SPFX */
+				    I18N::translate('Surname prefix');
+		    case 'SSN':
+			    return
+				    /* I18N: gedcom tag SSN */
+				    I18N::translate('Social security number');
+		    case 'STAE':
+			    return
+				    /* I18N: gedcom tag STAE */
+				    I18N::translate('State');
+		    case 'STAT':
+			    return
+				    /* I18N: gedcom tag STAT */
+				    I18N::translate('Status');
+		    case 'STAT:DATE':
+			    return I18N::translate('Status change date');
+		    case 'SUBM':
+			    return
+				    /* I18N: gedcom tag SUBM */
+				    I18N::translate('Submitter');
+		    case 'SUBN':
+			    return
+				    /* I18N: gedcom tag SUBN */
+				    I18N::translate('Submission');
+		    case 'SURN':
+			    return
+				    /* I18N: gedcom tag SURN */
+				    I18N::translate('Surname');
+		    case 'TEMP':
+			    return
+				    /* I18N: gedcom tag TEMP */
+				    I18N::translate('Temple');
+		    case 'TEXT':
+			    return
+				    /* I18N: gedcom tag TEXT */
+				    I18N::translate('Text');
+		    case 'TIME':
+			    return
+				    /* I18N: gedcom tag TIME */
+				    I18N::translate('Time');
+		    case 'TITL':
+			    return
+				    /* I18N: gedcom tag TITL */
+				    I18N::translate('Title');
+		    case 'TITL:FONE':
+			    return I18N::translate('Phonetic title');
+		    case 'TITL:ROMN':
+			    return I18N::translate('Romanized title');
+		    case 'TITL:_HEB':
+			    return I18N::translate('Title in Hebrew');
+		    case 'TRLR':
+			    return
+				    /* I18N: gedcom tag TRLR */
+				    I18N::translate('Trailer');
+		    case 'TYPE':
+			    return
+				    /* I18N: gedcom tag TYPE */
+				    I18N::translate('Type');
+		    case 'URL':
+			    return
+				    /* I18N: gedcom tag URL (A web address / URL) */
+				    I18N::translate('URL');
+		    case 'VERS':
+			    return
+				    /* I18N: gedcom tag VERS */
+				    I18N::translate('Version');
+		    case 'WIFE':
+			    return
+				    /* I18N: gedcom tag WIFE */
+				    I18N::translate('Wife');
+		    case 'WILL':
+			    return
+				    /* I18N: gedcom tag WILL */
+				    I18N::translate('Will');
+		    case 'WWW':
+			    return
+				    /* I18N: gedcom tag WWW (A web address / URL) */
+				    I18N::translate('URL');
+		    case '_ADOP_CHIL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Adoption of a son');
+			        case 'F':
+				        return I18N::translate('Adoption of a daughter');
+			        default:
+				        return I18N::translate('Adoption of a child');
+			    }
+		    case '_ADOP_GCHI':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Adoption of a grandson');
+			        case 'F':
+				        return I18N::translate('Adoption of a granddaughter');
+			        default:
+				        return I18N::translate('Adoption of a grandchild');
+			    }
+		    case '_ADOP_GCH1':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('daughter’s son', 'Adoption of a grandson');
+			        case 'F':
+				        return I18N::translateContext('daughter’s daughter', 'Adoption of a granddaughter');
+			        default:
+				        return I18N::translate('Adoption of a grandchild');
+			    }
+		    case '_ADOP_GCH2':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('son’s son', 'Adoption of a grandson');
+			        case 'F':
+				        return I18N::translateContext('son’s daughter', 'Adoption of a granddaughter');
+			        default:
+				        return I18N::translate('Adoption of a grandchild');
+			    }
+		    case '_ADOP_HSIB':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Adoption of a half-brother');
+			        case 'F':
+				        return I18N::translate('Adoption of a half-sister');
+			        default:
+				        return I18N::translate('Adoption of a half-sibling');
+			    }
+		    case '_ADOP_SIBL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Adoption of a brother');
+			        case 'F':
+				        return I18N::translate('Adoption of a sister');
+			        default:
+				        return I18N::translate('Adoption of a sibling');
+			    }
+		    case '_ADPF':
+			    switch ($sex) {
+			        case 'M':
+				        return
+					        /* I18N: gedcom tag _ADPF */
+					        I18N::translateContext('MALE', 'Adopted by father');
+			        case 'F':
+				        return
+					        /* I18N: gedcom tag _ADPF */
+					        I18N::translateContext('FEMALE', 'Adopted by father');
+			        default:
+				        return
+					        /* I18N: gedcom tag _ADPF */
+					        I18N::translate('Adopted by father');
+			    }
+		    case '_ADPM':
+			    switch ($sex) {
+			        case 'M':
+				        return
+					        /* I18N: gedcom tag _ADPM */
+					        I18N::translateContext('MALE', 'Adopted by mother');
+			        case 'F':
+				        return
+					        /* I18N: gedcom tag _ADPM */
+					        I18N::translateContext('FEMALE', 'Adopted by mother');
+			        default:
+				        return
+					        /* I18N: gedcom tag _ADPM */
+					        I18N::translate('Adopted by mother');
+			    }
+		    case '_AKA':
+		    case '_AKAN':
+			    switch ($sex) {
+			        case 'M':
+				        return
+					        /* I18N: gedcom tag _AKA */
+					        I18N::translateContext('MALE', 'Also known as');
+			        case 'F':
+				        return
+					        /* I18N: gedcom tag _AKA */
+					        I18N::translateContext('FEMALE', 'Also known as');
+			        default:
+				        return
+					        /* I18N: gedcom tag _AKA */
+					        I18N::translate('Also known as');
+			    }
+		    case '_ASSO':
+			    return
+				    /* I18N: gedcom tag _ASSO */
+				    I18N::translate('Associate'); /* see also ASSO */
+		    case '_BAPM_CHIL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Baptism of a son');
+			        case 'F':
+				        return I18N::translate('Baptism of a daughter');
+			        default:
+				        return I18N::translate('Baptism of a child');
+			    }
+		    case '_BAPM_GCHI':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Baptism of a grandson');
+			        case 'F':
+				        return I18N::translate('Baptism of a granddaughter');
+			        default:
+				        return I18N::translate('Baptism of a grandchild');
+			    }
+		    case '_BAPM_GCH1':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('daughter’s son', 'Baptism of a grandson');
+			        case 'F':
+				        return I18N::translateContext('daughter’s daughter', 'Baptism of a granddaughter');
+			        default:
+				        return I18N::translate('Baptism of a grandchild');
+			    }
+		    case '_BAPM_GCH2':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('son’s son', 'Baptism of a grandson');
+			        case 'F':
+				        return I18N::translateContext('son’s daughter', 'Baptism of a granddaughter');
+			        default:
+				        return I18N::translate('Baptism of a grandchild');
+			    }
+		    case '_BAPM_HSIB':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Baptism of a half-brother');
+			        case 'F':
+				        return I18N::translate('Baptism of a half-sister');
+			        default:
+				        return I18N::translate('Baptism of a half-sibling');
+			    }
+		    case '_BAPM_SIBL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Baptism of a brother');
+			        case 'F':
+				        return I18N::translate('Baptism of a sister');
+			        default:
+				        return I18N::translate('Baptism of a sibling');
+			    }
+		    case '_BIBL':
+			    return
+				    /* I18N: gedcom tag _BIBL */
+				    I18N::translate('Bibliography');
+		    case '_BIRT_CHIL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Birth of a son');
+			        case 'F':
+				        return I18N::translate('Birth of a daughter');
+			        default:
+				        return I18N::translate('Birth of a child');
+			    }
+		    case '_BIRT_GCHI':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Birth of a grandson');
+			        case 'F':
+				        return I18N::translate('Birth of a granddaughter');
+			        default:
+				        return I18N::translate('Birth of a grandchild');
+			    }
+		    case '_BIRT_GCH1':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('daughter’s son', 'Birth of a grandson');
+			        case 'F':
+				        return I18N::translateContext('daughter’s daughter', 'Birth of a granddaughter');
+			        default:
+				        return I18N::translate('Birth of a grandchild');
+			    }
+		    case '_BIRT_GCH2':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('son’s son', 'Birth of a grandson');
+			        case 'F':
+				        return I18N::translateContext('son’s daughter', 'Birth of a granddaughter');
+			        default:
+				        return I18N::translate('Birth of a grandchild');
+			    }
+		    case '_BIRT_HSIB':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Birth of a half-brother');
+			        case 'F':
+				        return I18N::translate('Birth of a half-sister');
+			        default:
+				        return I18N::translate('Birth of a half-sibling');
+			    }
+		    case '_BIRT_SIBL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Birth of a brother');
+			        case 'F':
+				        return I18N::translate('Birth of a sister');
+			        default:
+				        return I18N::translate('Birth of a sibling');
+			    }
+		    case '_BRTM':
+			    return
+				    /* I18N: gedcom tag _BRTM */
+				    I18N::translate('Brit milah');
+		    case '_BRTM:DATE':
+			    return I18N::translate('Date of brit milah');
+		    case '_BRTM:PLAC':
+			    return I18N::translate('Place of brit milah');
+		    case '_BURI_CHIL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Burial of a son');
+			        case 'F':
+				        return I18N::translate('Burial of a daughter');
+			        default:
+				        return I18N::translate('Burial of a child');
+			    }
+		    case '_BURI_GCHI':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Burial of a grandson');
+			        case 'F':
+				        return I18N::translate('Burial of a granddaughter');
+			        default:
+				        return I18N::translate('Burial of a grandchild');
+			    }
+		    case '_BURI_GCH1':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('daughter’s son', 'Burial of a grandson');
+			        case 'F':
+				        return I18N::translateContext('daughter’s daughter', 'Burial of a granddaughter');
+			        default:
+				        return I18N::translate('Burial of a grandchild');
+			    }
+		    case '_BURI_GCH2':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('son’s son', 'Burial of a grandson');
+			        case 'F':
+				        return I18N::translateContext('son’s daughter', 'Burial of a granddaughter');
+			        default:
+				        return I18N::translate('Burial of a grandchild');
+			    }
+		    case '_BURI_GPAR':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Burial of a grandfather');
+			        case 'F':
+				        return I18N::translate('Burial of a grandmother');
+			        default:
+				        return I18N::translate('Burial of a grandparent');
+			    }
+		    case '_BURI_GPA1':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Burial of a paternal grandfather');
+			        case 'F':
+				        return I18N::translate('Burial of a paternal grandmother');
+			        default:
+				        return I18N::translate('Burial of a paternal grandparent');
+			    }
+		    case '_BURI_GPA2':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Burial of a maternal grandfather');
+			        case 'F':
+				        return I18N::translate('Burial of a maternal grandmother');
+			        default:
+				        return I18N::translate('Burial of a maternal grandparent');
+			    }
+		    case '_BURI_HSIB':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Burial of a half-brother');
+			        case 'F':
+				        return I18N::translate('Burial of a half-sister');
+			        default:
+				        return I18N::translate('Burial of a half-sibling');
+			    }
+		    case '_BURI_PARE':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Burial of a father');
+			        case 'F':
+				        return I18N::translate('Burial of a mother');
+			        default:
+				        return I18N::translate('Burial of a parent');
+			    }
+		    case '_BURI_SIBL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Burial of a brother');
+			        case 'F':
+				        return I18N::translate('Burial of a sister');
+			        default:
+				        return I18N::translate('Burial of a sibling');
+			    }
+		    case '_BURI_SPOU':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Burial of a husband');
+			        case 'F':
+				        return I18N::translate('Burial of a wife');
+			        default:
+				        return I18N::translate('Burial of a spouse');
+			    }
+		    case '_CHR_CHIL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Christening of a son');
+			        case 'F':
+				        return I18N::translate('Christening of a daughter');
+			        default:
+				        return I18N::translate('Christening of a child');
+			    }
+		    case '_CHR_GCHI':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Christening of a grandson');
+			        case 'F':
+				        return I18N::translate('Christening of a granddaughter');
+			        default:
+				        return I18N::translate('Christening of a grandchild');
+			    }
+		    case '_CHR_GCH1':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('daughter’s son', 'Christening of a grandson');
+			        case 'F':
+				        return I18N::translateContext('daughter’s daughter', 'Christening of a granddaughter');
+			        default:
+				        return I18N::translate('Christening of a grandchild');
+			    }
+		    case '_CHR_GCH2':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('son’s son', 'Christening of a grandson');
+			        case 'F':
+				        return I18N::translateContext('son’s daughter', 'Christening of a granddaughter');
+			        default:
+				        return I18N::translate('Christening of a grandchild');
+			    }
+		    case '_CHR_HSIB':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Christening of a half-brother');
+			        case 'F':
+				        return I18N::translate('Christening of a half-sister');
+			        default:
+				        return I18N::translate('Christening of a half-sibling');
+			    }
+		    case '_CHR_SIBL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Christening of a brother');
+			        case 'F':
+				        return I18N::translate('Christening of a sister');
+			        default:
+				        return I18N::translate('Christening of a sibling');
+			    }
+		    case '_COML':
+			    return
+				    /* I18N: gedcom tag _COML */
+				    I18N::translate('Common law marriage');
+		    case '_CREM_CHIL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Cremation of a son');
+			        case 'F':
+				        return I18N::translate('Cremation of a daughter');
+			        default:
+				        return I18N::translate('Cremation of a child');
+			    }
+		    case '_CREM_GCHI':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Cremation of a grandson');
+			        case 'F':
+				        return I18N::translate('Cremation of a granddaughter');
+			        default:
+				        return I18N::translate('Cremation of a grandchild');
+			    }
+		    case '_CREM_GCH1':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('daughter’s son', 'Cremation of a grandson');
+			        case 'F':
+				        return I18N::translateContext('daughter’s daughter', 'Cremation of a granddaughter');
+			        default:
+				        return I18N::translate('Cremation of a grandchild');
+			    }
+		    case '_CREM_GCH2':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('son’s son', 'Cremation of a grandson');
+			        case 'F':
+				        return I18N::translateContext('son’s daughter', 'Cremation of a granddaughter');
+			        default:
+				        return I18N::translate('Cremation of a grandchild');
+			    }
+		    case '_CREM_GPAR':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Cremation of a grandfather');
+			        case 'F':
+				        return I18N::translate('Cremation of a grandmother');
+			        default:
+				        return I18N::translate('Cremation of a grand-parent');
+			    }
+		    case '_CREM_GPA1':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Cremation of a paternal grandfather');
+			        case 'F':
+				        return I18N::translate('Cremation of a paternal grandmother');
+			        default:
+				        return I18N::translate('Cremation of a grand-parent');
+			    }
+		    case '_CREM_GPA2':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Cremation of a maternal grandfather');
+			        case 'F':
+				        return I18N::translate('Cremation of a maternal grandmother');
+			        default:
+				        return I18N::translate('Cremation of a grand-parent');
+			    }
+		    case '_CREM_HSIB':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Cremation of a half-brother');
+			        case 'F':
+				        return I18N::translate('Cremation of a half-sister');
+			        default:
+				        return I18N::translate('Cremation of a half-sibling');
+			    }
+		    case '_CREM_PARE':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Cremation of a father');
+			        case 'F':
+				        return I18N::translate('Cremation of a mother');
+			        default:
+				        return I18N::translate('Cremation of a parent');
+			    }
+		    case '_CREM_SIBL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Cremation of a brother');
+			        case 'F':
+				        return I18N::translate('Cremation of a sister');
+			        default:
+				        return I18N::translate('Cremation of a sibling');
+			    }
+		    case '_CREM_SPOU':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Cremation of a husband');
+			        case 'F':
+				        return I18N::translate('Cremation of a wife');
+			        default:
+				        return I18N::translate('Cremation of a spouse');
+			    }
+		    case '_DBID':
+			    return
+				    /* I18N: gedcom tag _DBID */
+				    I18N::translate('Linked database ID');
+		    case '_DEAT_CHIL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Death of a son');
+			        case 'F':
+				        return I18N::translate('Death of a daughter');
+			        default:
+				        return I18N::translate('Death of a child');
+			    }
+		    case '_DEAT_GCHI':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Death of a grandson');
+			        case 'F':
+				        return I18N::translate('Death of a granddaughter');
+			        default:
+				        return I18N::translate('Death of a grandchild');
+			    }
+		    case '_DEAT_GCH1':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('daughter’s son', 'Death of a grandson');
+			        case 'F':
+				        return I18N::translateContext('daughter’s daughter', 'Death of a granddaughter');
+			        default:
+				        return I18N::translate('Death of a grandchild');
+			    }
+		    case '_DEAT_GCH2':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('son’s son', 'Death of a grandson');
+			        case 'F':
+				        return I18N::translateContext('son’s daughter', 'Death of a granddaughter');
+			        default:
+				        return I18N::translate('Death of a grandchild');
+			    }
+		    case '_DEAT_GPAR':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Death of a grandfather');
+			        case 'F':
+				        return I18N::translate('Death of a grandmother');
+			        default:
+				        return I18N::translate('Death of a grand-parent');
+			    }
+		    case '_DEAT_GPA1':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Death of a paternal grandfather');
+			        case 'F':
+				        return I18N::translate('Death of a paternal grandmother');
+			        default:
+				        return I18N::translate('Death of a grand-parent');
+			    }
+		    case '_DEAT_GPA2':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Death of a maternal grandfather');
+			        case 'F':
+				        return I18N::translate('Death of a maternal grandmother');
+			        default:
+				        return I18N::translate('Death of a grand-parent');
+			    }
+		    case '_DEAT_HSIB':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Death of a half-brother');
+			        case 'F':
+				        return I18N::translate('Death of a half-sister');
+			        default:
+				        return I18N::translate('Death of a half-sibling');
+			    }
+		    case '_DEAT_PARE':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Death of a father');
+			        case 'F':
+				        return I18N::translate('Death of a mother');
+			        default:
+				        return I18N::translate('Death of a parent');
+			    }
+		    case '_DEAT_SIBL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Death of a brother');
+			        case 'F':
+				        return I18N::translate('Death of a sister');
+			        default:
+				        return I18N::translate('Death of a sibling');
+			    }
+		    case '_DEAT_SPOU':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Death of a husband');
+			        case 'F':
+				        return I18N::translate('Death of a wife');
+			        default:
+				        return I18N::translate('Death of a spouse');
+			    }
+		    case '_DEG':
+			    return
+				    /* I18N: gedcom tag _DEG */
+				    I18N::translate('Degree');
+		    case '_DETS':
+			    return
+				    /* I18N: gedcom tag _DETS */
+				    I18N::translate('Death of one spouse');
+		    case '_DNA':
+			    return
+				    /* I18N: gedcom tag _DNA (from FTM 2010) */
+				    I18N::translate('DNA markers');
+		    case '_EMAIL':
+			    return
+				    /* I18N: gedcom tag _EMAIL */
+				    I18N::translate('Email address');
+		    case '_EYEC':
+			    return
+				    /* I18N: gedcom tag _EYEC */
+				    I18N::translate('Eye color');
+		    case '_FA1':
+			    return I18N::translate('Fact 1');
+		    case '_FA2':
+			    return I18N::translate('Fact 2');
+		    case '_FA3':
+			    return I18N::translate('Fact 3');
+		    case '_FA4':
+			    return I18N::translate('Fact 4');
+		    case '_FA5':
+			    return I18N::translate('Fact 5');
+		    case '_FA6':
+			    return I18N::translate('Fact 6');
+		    case '_FA7':
+			    return I18N::translate('Fact 7');
+		    case '_FA8':
+			    return I18N::translate('Fact 8');
+		    case '_FA9':
+			    return I18N::translate('Fact 9');
+		    case '_FA10':
+			    return I18N::translate('Fact 10');
+		    case '_FA11':
+			    return I18N::translate('Fact 11');
+		    case '_FA12':
+			    return I18N::translate('Fact 12');
+		    case '_FA13':
+			    return I18N::translate('Fact 13');
+		    case '_FNRL':
+			    return
+				    /* I18N: gedcom tag _FNRL */
+				    I18N::translate('Funeral');
+		    case '_FREL':
+			    return
+				    /* I18N: gedcom tag _FREL */
+				    I18N::translate('Relationship to father');
+		    case '_GEDF':
+			    return
+				    /* I18N: gedcom tag _GEDF */
+				    I18N::translate('GEDCOM file');
+		    case '_GODP':
+			    return
+				    /* I18N: gedcom tag _GODP */
+				    I18N::translate('Godparent');
+		    case '_HAIR':
+			    return
+				    /* I18N: gedcom tag _HAIR */
+				    I18N::translate('Hair color');
+		    case '_HEB':
+			    return
+				    /* I18N: gedcom tag _HEB */
+				    I18N::translate('Hebrew');
+		    case '_HEIG':
+			    return
+				    /* I18N: gedcom tag _HEIG */
+				    I18N::translate('Height');
+		    case '_HNM':
+			    return
+				    /* I18N: gedcom tag _HNM */
+				    I18N::translate('Hebrew name');
+		    case '_HOL':
+			    return
+				    /* I18N: gedcom tag _HOL */
+				    I18N::translate('Holocaust');
+		    case '_INTE':
+			    switch ($sex) {
+			        case 'M':
+				        return
+					        /* I18N: gedcom tag _INTE */
+					        I18N::translateContext('MALE', 'Interred');
+			        case 'F':
+				        return
+					        /* I18N: gedcom tag _INTE */
+					        I18N::translateContext('FEMALE', 'Interred');
+			        default:
+				        return
+					        /* I18N: gedcom tag _INTE */
+					        I18N::translate('Interred');
+			    }
+		    case '_LOC':
+			    return
+				    /* I18N: gedcom tag _LOC */
+				    I18N::translate('Location');
+		    case '_MARI':
+			    return
+				    /* I18N: gedcom tag _MARI */
+				    I18N::translate('Marriage intention');
+		    case '_MARNM':
+			    return
+				    /* I18N: gedcom tag _MARNM */
+				    I18N::translate('Married name');
+		    case '_PRIM':
+			    return
+				    /* I18N: gedcom tag _PRIM */
+				    I18N::translate('Highlighted image');
+		    case '_MARNM_SURN':
+			    return I18N::translate('Married surname');
+		    case '_MARR_CHIL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Marriage of a son');
+			        case 'F':
+				        return I18N::translate('Marriage of a daughter');
+			        default:
+				        return I18N::translate('Marriage of a child');
+			    }
+		    case '_MARR_FAMC':
+			    return
+				    /* I18N: ...to each other */
+				    I18N::translate('Marriage of parents');
+		    case '_MARR_GCHI':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Marriage of a grandson');
+			        case 'F':
+				        return I18N::translate('Marriage of a granddaughter');
+			        default:
+				        return I18N::translate('Marriage of a grandchild');
+			    }
+		    case '_MARR_GCH1':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('daughter’s son', 'Marriage of a grandson');
+			        case 'F':
+				        return I18N::translateContext('daughter’s daughter', 'Marriage of a granddaughter');
+			        default:
+				        return I18N::translate('Marriage of a grandchild');
+			    }
+		    case '_MARR_GCH2':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translateContext('son’s son', 'Marriage of a grandson');
+			        case 'F':
+				        return I18N::translateContext('son’s daughter', 'Marriage of a granddaughter');
+			        default:
+				        return I18N::translate('Marriage of a grandchild');
+			    }
+		    case '_MARR_HSIB':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Marriage of a half-brother');
+			        case 'F':
+				        return I18N::translate('Marriage of a half-sister');
+			        default:
+				        return I18N::translate('Marriage of a half-sibling');
+			    }
+		    case '_MARR_PARE':
+			    switch ($sex) {
+			        case 'M':
+				        return
+					        /* I18N: ...to another spouse */
+					        I18N::translate('Marriage of a father');
+			        case 'F':
+				        return
+					        /* I18N: ...to another spouse */
+					        I18N::translate('Marriage of a mother');
+			        default:
+				        return
+					        /* I18N: ...to another spouse */
+					        I18N::translate('Marriage of a parent');
+			    }
+		    case '_MARR_SIBL':
+			    switch ($sex) {
+			        case 'M':
+				        return I18N::translate('Marriage of a brother');
+			        case 'F':
+				        return I18N::translate('Marriage of a sister');
+			        default:
+				        return I18N::translate('Marriage of a sibling');
+			    }
+		    case '_MBON':
+			    return
+				    /* I18N: gedcom tag _MBON */
+				    I18N::translate('Marriage bond');
+		    case '_MDCL':
+			    return
+				    /* I18N: gedcom tag _MDCL */
+				    I18N::translate('Medical');
+		    case '_MEDC':
+			    return
+				    /* I18N: gedcom tag _MEDC */
+				    I18N::translate('Medical condition');
+		    case '_MEND':
+			    return
+				    /* I18N: gedcom tag _MEND */
+				    I18N::translate('Marriage ending status');
+		    case '_MILI':
+			    return
+				    /* I18N: gedcom tag _MILI */
+				    I18N::translate('Military');
+		    case '_MILT':
+			    return
+				    /* I18N: gedcom tag _MILT */
+				    I18N::translate('Military service');
+		    case '_MREL':
+			    return
+				    /* I18N: gedcom tag _MREL */
+				    I18N::translate('Relationship to mother');
+		    case '_MSTAT':
+			    return
+				    /* I18N: gedcom tag _MSTAT */
+				    I18N::translate('Marriage beginning status');
+		    case '_NAME':
+			    return
+				    /* I18N: gedcom tag _NAME */
+				    I18N::translate('Mailing name');
+		    case '_NAMS':
+			    return
+				    /* I18N: gedcom tag _NAMS */
+				    I18N::translate('Namesake');
+		    case '_NLIV':
+			    return
+				    /* I18N: gedcom tag _NLIV */
+				    I18N::translate('Not living');
+		    case '_NMAR':
+			    switch ($sex) {
+			        case 'M':
+				        return
+					        /* I18N: gedcom tag _NMAR */
+					        I18N::translateContext('MALE', 'Never married');
+			        case 'F':
+				        return
+					        /* I18N: gedcom tag _NMAR */
+					        I18N::translateContext('FEMALE', 'Never married');
+			        default:
+				        return
+					        /* I18N: gedcom tag _NMAR */
+					        I18N::translate('Never married');
+			    }
+		    case '_NMR':
+			    switch ($sex) {
+			        case 'M':
+				        return
+					        /* I18N: gedcom tag _NMR */
+					        I18N::translateContext('MALE', 'Not married');
+			        case 'F':
+				        return
+					        /* I18N: gedcom tag _NMR */
+					        I18N::translateContext('FEMALE', 'Not married');
+			        default:
+				        return
+					        /* I18N: gedcom tag _NMR */
+					        I18N::translate('Not married');
+			    }
+		    case '_WT_USER':
+			    return I18N::translate('by');
+		    case '_PRMN':
+			    return
+				    /* I18N: gedcom tag _PRMN */
+				    I18N::translate('Permanent number');
+		    case '_SCBK':
+			    return
+				    /* I18N: gedcom tag _SCBK */
+				    I18N::translate('Scrapbook');
+		    case '_SEPR':
+			    return
+				    /* I18N: gedcom tag _SEPR */
+				    I18N::translate('Separated');
+		    case '_SSHOW':
+			    return
+				    /* I18N: gedcom tag _SSHOW */
+				    I18N::translate('Slide show');
+		    case '_STAT':
+			    return
+				    /* I18N: gedcom tag _STAT */
+				    I18N::translate('Marriage status');
+		    case '_SUBQ':
+			    return
+				    /* I18N: gedcom tag _SUBQ */
+				    I18N::translate('Short version');
+		    case '_TODO':
+			    return
+				    /* I18N: gedcom tag _TODO */
+				    I18N::translate('Research task');
+		    case '_TYPE':
+			    return
+				    /* I18N: gedcom tag _TYPE */
+				    I18N::translate('Media type');
+		    case '_UID':
+			    return
+				    /* I18N: gedcom tag _UID */
+				    I18N::translate('Unique identifier');
+		    case '_URL':
+			    return
+				    /* I18N: gedcom tag _URL */
+				    I18N::translate('URL');
+		    case '_WEIG':
+			    return
+				    /* I18N: gedcom tag _WEIG */
+				    I18N::translate('Weight');
+		    case '_WITN':
+			    return
+				    /* I18N: gedcom tag _WITN */
+				    I18N::translate('Witness');
+		    case '_WT_OBJE_SORT':
+			    return
+				    /* I18N: gedcom tag _WT_OBJE_SORT */
+				    I18N::translate('Re-order media');
+		    case '_YART':
+			    return /* I18N: gedcom tag _YART - A yahrzeit is a special anniversary of death in the Hebrew faith/calendar. */ I18N::translate('Yahrzeit');
+			    // Brit milah applies only to males, no need for male/female translations
+		    case '__BRTM_CHIL':
+			    return I18N::translate('Brit milah of a son');
+		    case '__BRTM_GCHI':
+			    return I18N::translate('Brit milah of a grandson');
+		    case '__BRTM_GCH1':
+			    return I18N::translateContext('daughter’s son', 'Brit milah of a grandson');
+		    case '__BRTM_GCH2':
+			    return I18N::translateContext('son’s son', 'Brit milah of a grandson');
+		    case '__BRTM_HSIB':
+			    return I18N::translate('Brit milah of a half-brother');
+		    case '__BRTM_SIBL':
+			    return I18N::translate('Brit milah of a brother');
+			    // These "pseudo" tags are generated internally to present information about a media object
+		    case '__FILE_SIZE__':
+			    return I18N::translate('File size');
+		    case '__IMAGE_SIZE__':
+			    return I18N::translate('Image dimensions');
+		    default:
+			    // If no specialisation exists (e.g. DEAT:CAUS), then look for the general (CAUS)
+			    if (strpos($tag, ':')) {
+				    list(, $tag) = explode(':', $tag, 2);
 
-				return self::getLabel($tag, $record);
-			}
+				    return self::getLabel($tag, $record);
+			    }
 
-			// Still no translation? Highlight this as an error
-			return '<span class="error" title="' . I18N::translate('Unrecognized GEDCOM code') . '">' . Filter::escapeHtml($tag) . '</span>';
+			    // Still no translation? Highlight this as an error
+			    return '<span class="error" title="' . I18N::translate('Unrecognized GEDCOM code') . '">' . Filter::escapeHtml($tag) . '</span>';
 		}
 	}
 
@@ -1823,69 +1823,69 @@ 
 	 */
 	public static function getPicklistFacts($fact_type) {
 		switch ($fact_type) {
-		case 'INDI':
-			$tags = array(
-				// Facts, attributes for individuals (no links to FAMs)
-				'RESN', 'NAME', 'SEX', 'BIRT', 'CHR', 'DEAT', 'BURI', 'CREM',
-				'ADOP', 'BAPM', 'BARM', 'BASM', 'BLES', 'CHRA', 'CONF', 'FCOM', 'ORDN',
-				'NATU', 'EMIG', 'IMMI', 'CENS', 'PROB', 'WILL', 'GRAD', 'RETI', 'EVEN',
-				'CAST', 'DSCR', 'EDUC', 'IDNO', 'NATI', 'NCHI', 'NMR',
-				'OCCU', 'PROP', 'RELI', 'RESI', 'SSN', 'TITL', 'FACT',
-				'BAPL', 'CONL', 'ENDL', 'SLGC',
-				'SUBM', 'ASSO', 'ALIA', 'ANCI', 'DESI', 'RFN', 'AFN',
-				'REFN', 'RIN', 'CHAN', 'NOTE', 'SHARED_NOTE', 'SOUR', 'OBJE',
-				// non standard tags
-				'_BRTM', '_DEG', '_DNA', '_EYEC', '_FNRL', '_HAIR', '_HEIG', '_HNM',
-				'_HOL', '_INTE', '_MDCL', '_MEDC', '_MILI', '_MILT', '_NAME', '_NAMS',
-				'_NLIV', '_NMAR', '_PRMN', '_TODO', '_UID', '_WEIG', '_YART',
-			);
-			break;
-		case 'FAM':
-			$tags = array(
-				// Facts for families, left out HUSB, WIFE & CHIL links
-				'RESN', 'ANUL', 'CENS', 'DIV', 'DIVF', 'ENGA', 'MARB', 'MARC',
-				'MARR', 'MARL', 'MARS', 'RESI', 'EVEN', 'NCHI', 'SUBM', 'SLGS',
-				'REFN', 'RIN', 'CHAN', 'NOTE', 'SHARED_NOTE', 'SOUR', 'OBJE',
-				// non standard tags
-				'_NMR', 'MARR_CIVIL', 'MARR_RELIGIOUS', 'MARR_PARTNERS', 'MARR_UNKNOWN',
-				'_COML', '_MBON', '_MARI', '_SEPR', '_TODO',
-			);
-		break;
-		case 'SOUR':
-			$tags = array(
-				// Facts for sources
-				'DATA', 'AUTH', 'TITL', 'ABBR', 'PUBL', 'TEXT', 'REPO', 'REFN', 'RIN',
-				'CHAN', 'NOTE', 'SHARED_NOTE', 'OBJE',
-				'RESN',
-			);
-			break;
-		case 'REPO':
-			$tags = array(
-				// Facts for repositories
-				'NAME', 'ADDR', 'PHON', 'EMAIL', 'FAX', 'WWW',
-				'NOTE', 'SHARED_NOTE', 'REFN', 'RIN', 'CHAN',
-				'RESN',
-			);
-			break;
-		case 'PLAC':
-			$tags = array(
-				// Facts for places
-				'FONE', 'ROMN',
-				// non standard tags
-				'_HEB',
-			);
-			break;
-		case 'NAME':
-			$tags = array(
-				// Facts subordinate to NAME
-				'NICK', 'FONE', 'ROMN',
-				// non standard tags
-				'_HEB', '_AKA',
-			);
-			break;
-		default:
-			$tags = array();
-			break;
+		    case 'INDI':
+			    $tags = array(
+				    // Facts, attributes for individuals (no links to FAMs)
+				    'RESN', 'NAME', 'SEX', 'BIRT', 'CHR', 'DEAT', 'BURI', 'CREM',
+				    'ADOP', 'BAPM', 'BARM', 'BASM', 'BLES', 'CHRA', 'CONF', 'FCOM', 'ORDN',
+				    'NATU', 'EMIG', 'IMMI', 'CENS', 'PROB', 'WILL', 'GRAD', 'RETI', 'EVEN',
+				    'CAST', 'DSCR', 'EDUC', 'IDNO', 'NATI', 'NCHI', 'NMR',
+				    'OCCU', 'PROP', 'RELI', 'RESI', 'SSN', 'TITL', 'FACT',
+				    'BAPL', 'CONL', 'ENDL', 'SLGC',
+				    'SUBM', 'ASSO', 'ALIA', 'ANCI', 'DESI', 'RFN', 'AFN',
+				    'REFN', 'RIN', 'CHAN', 'NOTE', 'SHARED_NOTE', 'SOUR', 'OBJE',
+				    // non standard tags
+				    '_BRTM', '_DEG', '_DNA', '_EYEC', '_FNRL', '_HAIR', '_HEIG', '_HNM',
+				    '_HOL', '_INTE', '_MDCL', '_MEDC', '_MILI', '_MILT', '_NAME', '_NAMS',
+				    '_NLIV', '_NMAR', '_PRMN', '_TODO', '_UID', '_WEIG', '_YART',
+			    );
+			    break;
+		    case 'FAM':
+			    $tags = array(
+				    // Facts for families, left out HUSB, WIFE & CHIL links
+				    'RESN', 'ANUL', 'CENS', 'DIV', 'DIVF', 'ENGA', 'MARB', 'MARC',
+				    'MARR', 'MARL', 'MARS', 'RESI', 'EVEN', 'NCHI', 'SUBM', 'SLGS',
+				    'REFN', 'RIN', 'CHAN', 'NOTE', 'SHARED_NOTE', 'SOUR', 'OBJE',
+				    // non standard tags
+				    '_NMR', 'MARR_CIVIL', 'MARR_RELIGIOUS', 'MARR_PARTNERS', 'MARR_UNKNOWN',
+				    '_COML', '_MBON', '_MARI', '_SEPR', '_TODO',
+			    );
+		    break;
+		    case 'SOUR':
+			    $tags = array(
+				    // Facts for sources
+				    'DATA', 'AUTH', 'TITL', 'ABBR', 'PUBL', 'TEXT', 'REPO', 'REFN', 'RIN',
+				    'CHAN', 'NOTE', 'SHARED_NOTE', 'OBJE',
+				    'RESN',
+			    );
+			    break;
+		    case 'REPO':
+			    $tags = array(
+				    // Facts for repositories
+				    'NAME', 'ADDR', 'PHON', 'EMAIL', 'FAX', 'WWW',
+				    'NOTE', 'SHARED_NOTE', 'REFN', 'RIN', 'CHAN',
+				    'RESN',
+			    );
+			    break;
+		    case 'PLAC':
+			    $tags = array(
+				    // Facts for places
+				    'FONE', 'ROMN',
+				    // non standard tags
+				    '_HEB',
+			    );
+			    break;
+		    case 'NAME':
+			    $tags = array(
+				    // Facts subordinate to NAME
+				    'NICK', 'FONE', 'ROMN',
+				    // non standard tags
+				    '_HEB', '_AKA',
+			    );
+			    break;
+		    default:
+			    $tags = array();
+			    break;
 		}
 
 		$facts = array();
@@ -1906,42 +1906,42 @@ 
 	 */
 	public static function getFileFormTypeValue($type) {
 		switch (strtolower($type)) {
-		case 'audio':
-			return /* I18N: Type of media object */ I18N::translate('Audio');
-		case 'book':
-			return /* I18N: Type of media object */ I18N::translate('Book');
-		case 'card':
-			return /* I18N: Type of media object */ I18N::translate('Card');
-		case 'certificate':
-			return /* I18N: Type of media object */ I18N::translate('Certificate');
-		case 'coat':
-			return /* I18N: Type of media object */ I18N::translate('Coat of arms');
-		case 'document':
-			return /* I18N: Type of media object */ I18N::translate('Document');
-		case 'electronic':
-			return /* I18N: Type of media object */ I18N::translate('Electronic');
-		case 'fiche':
-			return /* I18N: Type of media object */ I18N::translate('Microfiche');
-		case 'film':
-			return /* I18N: Type of media object */ I18N::translate('Microfilm');
-		case 'magazine':
-			return /* I18N: Type of media object */ I18N::translate('Magazine');
-		case 'manuscript':
-			return /* I18N: Type of media object */ I18N::translate('Manuscript');
-		case 'map':
-			return /* I18N: Type of media object */ I18N::translate('Map');
-		case 'newspaper':
-			return /* I18N: Type of media object */ I18N::translate('Newspaper');
-		case 'photo':
-			return /* I18N: Type of media object */ I18N::translate('Photo');
-		case 'tombstone':
-			return /* I18N: Type of media object */ I18N::translate('Tombstone');
-		case 'video':
-			return /* I18N: Type of media object */ I18N::translate('Video');
-		case 'painting':
-			return /* I18N: Type of media object */ I18N::translate('Painting');
-		default:
-			return /* I18N: Type of media object */ I18N::translate('Other');
+		    case 'audio':
+			    return /* I18N: Type of media object */ I18N::translate('Audio');
+		    case 'book':
+			    return /* I18N: Type of media object */ I18N::translate('Book');
+		    case 'card':
+			    return /* I18N: Type of media object */ I18N::translate('Card');
+		    case 'certificate':
+			    return /* I18N: Type of media object */ I18N::translate('Certificate');
+		    case 'coat':
+			    return /* I18N: Type of media object */ I18N::translate('Coat of arms');
+		    case 'document':
+			    return /* I18N: Type of media object */ I18N::translate('Document');
+		    case 'electronic':
+			    return /* I18N: Type of media object */ I18N::translate('Electronic');
+		    case 'fiche':
+			    return /* I18N: Type of media object */ I18N::translate('Microfiche');
+		    case 'film':
+			    return /* I18N: Type of media object */ I18N::translate('Microfilm');
+		    case 'magazine':
+			    return /* I18N: Type of media object */ I18N::translate('Magazine');
+		    case 'manuscript':
+			    return /* I18N: Type of media object */ I18N::translate('Manuscript');
+		    case 'map':
+			    return /* I18N: Type of media object */ I18N::translate('Map');
+		    case 'newspaper':
+			    return /* I18N: Type of media object */ I18N::translate('Newspaper');
+		    case 'photo':
+			    return /* I18N: Type of media object */ I18N::translate('Photo');
+		    case 'tombstone':
+			    return /* I18N: Type of media object */ I18N::translate('Tombstone');
+		    case 'video':
+			    return /* I18N: Type of media object */ I18N::translate('Video');
+		    case 'painting':
+			    return /* I18N: Type of media object */ I18N::translate('Painting');
+		    default:
+			    return /* I18N: Type of media object */ I18N::translate('Other');
 		}
 	}
 

Braces +16 added lines, -8 removed lines

@@ -20,7 +20,8 @@ 
 /**
  * Static GEDCOM data for tags
  */
-class GedcomTag {
+class GedcomTag
+{
 	/** @var string[] All tags that webtrees knows how to translate - including special/internal tags */
 	private static $ALL_TAGS = array(
 		'ABBR', 'ADDR', 'ADR1', 'ADR2', 'ADOP', 'ADOP:DATE', 'ADOP:PLAC',
@@ -92,7 +93,8 @@ 
 	 *
 	 * @return bool
 	 */
-	public static function isTag($tag) {
+	public static function isTag($tag)
+	{
 		return in_array($tag, self::$ALL_TAGS);
 	}
 
@@ -104,7 +106,8 @@ 
 	 *
 	 * @return string
 	 */
-	public static function getLabel($tag, GedcomRecord $record = null) {
+	public static function getLabel($tag, GedcomRecord $record = null)
+	{
 		if ($record instanceof Individual) {
 			$sex = $record->getSex();
 		} else {
@@ -1808,7 +1811,8 @@ 
 	 *
 	 * @return string
 	 */
-	public static function getLabelValue($tag, $value, GedcomRecord $record = null, $element = 'div') {
+	public static function getLabelValue($tag, $value, GedcomRecord $record = null, $element = 'div')
+	{
 		return
 			'<' . $element . ' class="fact_' . $tag . '">' .
 			/* I18N: a label/value pair, such as “Occupation: Farmer”. Some languages may need to change the punctuation. */
@@ -1821,7 +1825,8 @@ 
 	 *
 	 * @return string[]
 	 */
-	public static function getPicklistFacts($fact_type) {
+	public static function getPicklistFacts($fact_type)
+	{
 		switch ($fact_type) {
 		case 'INDI':
 			$tags = array(
@@ -1904,7 +1909,8 @@ 
 	 *
 	 * @return string
 	 */
-	public static function getFileFormTypeValue($type) {
+	public static function getFileFormTypeValue($type)
+	{
 		switch (strtolower($type)) {
 		case 'audio':
 			return /* I18N: Type of media object */ I18N::translate('Audio');
@@ -1950,7 +1956,8 @@ 
 	 *
 	 * @return string[]
 	 */
-	public static function getFileFormTypes() {
+	public static function getFileFormTypes()
+	{
 		$values = array();
 		foreach (self::$OBJE_FILE_FORM_TYPE as $type) {
 			$values[$type] = self::getFileFormTypeValue($type);
@@ -1969,7 +1976,8 @@ 
 	 *
 	 * @return string
 	 */
-	public static function createUid() {
+	public static function createUid()
+	{
 		$uid = str_replace('-', '', Uuid::uuid4());
 
 		$checksum_a = 0; // a sum of the bytes

app/FlashMessages.php

Indentation +26 added lines, -26 removed lines

@@ -19,34 +19,34 @@
  * Generate messages in one request and display them in the next.
  */
 class FlashMessages {
-	// Session storage key
-	const FLASH_KEY = 'flash_messages';
+    // Session storage key
+    const FLASH_KEY = 'flash_messages';
 
-	/**
-	 * Add a message to the session storage.
-	 *
-	 * @param string $text
-	 * @param string $status "success", "info", "warning" or "danger"
-	 */
-	public static function addMessage($text, $status = 'info') {
-		$message         = new \stdClass;
-		$message->text   = $text;
-		$message->status = $status;
+    /**
+     * Add a message to the session storage.
+     *
+     * @param string $text
+     * @param string $status "success", "info", "warning" or "danger"
+     */
+    public static function addMessage($text, $status = 'info') {
+        $message         = new \stdClass;
+        $message->text   = $text;
+        $message->status = $status;
 
-		$messages   = Session::get(self::FLASH_KEY, array());
-		$messages[] = $message;
-		Session::put(self::FLASH_KEY, $messages);
-	}
+        $messages   = Session::get(self::FLASH_KEY, array());
+        $messages[] = $message;
+        Session::put(self::FLASH_KEY, $messages);
+    }
 
-	/**
-	 * Get the current messages, and remove them from session storage.
-	 *
-	 * @return string[]
-	 */
-	public static function getMessages() {
-		$messages = Session::get(self::FLASH_KEY, array());
-		Session::forget(self::FLASH_KEY);
+    /**
+     * Get the current messages, and remove them from session storage.
+     *
+     * @return string[]
+     */
+    public static function getMessages() {
+        $messages = Session::get(self::FLASH_KEY, array());
+        Session::forget(self::FLASH_KEY);
 
-		return $messages;
-	}
+        return $messages;
+    }
 }

Braces +6 added lines, -3 removed lines

@@ -18,7 +18,8 @@ 
 /**
  * Generate messages in one request and display them in the next.
  */
-class FlashMessages {
+class FlashMessages
+{
 	// Session storage key
 	const FLASH_KEY = 'flash_messages';
 
@@ -28,7 +29,8 @@ 
 	 * @param string $text
 	 * @param string $status "success", "info", "warning" or "danger"
 	 */
-	public static function addMessage($text, $status = 'info') {
+	public static function addMessage($text, $status = 'info')
+	{
 		$message         = new \stdClass;
 		$message->text   = $text;
 		$message->status = $status;
@@ -43,7 +45,8 @@ 
 	 *
 	 * @return string[]
 	 */
-	public static function getMessages() {
+	public static function getMessages()
+	{
 		$messages = Session::get(self::FLASH_KEY, array());
 		Session::forget(self::FLASH_KEY);
 

app/User.php

Indentation +538 added lines, -538 removed lines

@@ -19,542 +19,542 @@
  * Provide an interface to the wt_user table.
  */
 class User {
-	/** @var  string The primary key of this user. */
-	private $user_id;
-
-	/** @var  string The login name of this user. */
-	private $user_name;
-
-	/** @var  string The real (display) name of this user. */
-	private $real_name;
-
-	/** @var  string The email address of this user. */
-	private $email;
-
-	/** @var array Cached copy of the wt_user_setting table. */
-	private $preferences;
-
-	/** @var  User[] Only fetch users from the database once. */
-	private static $cache = array();
-
-	/**
-	 * Find the user with a specified user_id.
-	 *
-	 * @param int|null $user_id
-	 *
-	 * @return User|null
-	 */
-	public static function find($user_id) {
-		if (!array_key_exists($user_id, self::$cache)) {
-			$row = Database::prepare(
-				"SELECT user_id, user_name, real_name, email FROM `##user` WHERE user_id = ?"
-			)->execute(array($user_id))->fetchOneRow();
-			if ($row) {
-				self::$cache[$user_id] = new self($row);
-			} else {
-				self::$cache[$user_id] = null;
-			}
-		}
-
-		return self::$cache[$user_id];
-	}
-
-	/**
-	 * Find the user with a specified user_name.
-	 *
-	 * @param string $user_name
-	 *
-	 * @return User|null
-	 */
-	public static function findByUserName($user_name) {
-		$user_id = Database::prepare(
-			"SELECT user_id FROM `##user` WHERE user_name = :user_name"
-		)->execute(array(
-			'user_name' => $user_name,
-		))->fetchOne();
-
-		return self::find($user_id);
-	}
-
-	/**
-	 * Find the user with a specified email address.
-	 *
-	 * @param string $email
-	 *
-	 * @return User|null
-	 */
-	public static function findByEmail($email) {
-		$user_id = Database::prepare(
-			"SELECT user_id FROM `##user` WHERE email = :email"
-		)->execute(array(
-			'email' => $email,
-		))->fetchOne();
-
-		return self::find($user_id);
-	}
-
-	/**
-	 * Find the user with a specified user_name or email address.
-	 *
-	 * @param string $identifier
-	 *
-	 * @return User|null
-	 */
-	public static function findByIdentifier($identifier) {
-		$user_id = Database::prepare(
-			"SELECT user_id FROM `##user` WHERE ? IN (user_name, email)"
-		)->execute(array($identifier))->fetchOne();
-
-		return self::find($user_id);
-	}
-
-	/**
-	 * Find the user with a specified genealogy record.
-	 *
-	 * @param Individual $individual
-	 *
-	 * @return User|null
-	 */
-	public static function findByGenealogyRecord(Individual $individual) {
-		$user_id = Database::prepare(
-			"SELECT user_id" .
-			" FROM `##user_gedcom_setting`" .
-			" WHERE gedcom_id = :tree_id AND setting_name = 'gedcomid' AND setting_value = :xref"
-		)->execute(array(
-			'tree_id' => $individual->getTree()->getTreeId(),
-			'xref'    => $individual->getXref(),
-		))->fetchOne();
-
-		return self::find($user_id);
-	}
-
-	/**
-	 * Find the latest user to register.
-	 *
-	 * @return User|null
-	 */
-	public static function findLatestToRegister() {
-		$user_id = Database::prepare(
-			"SELECT u.user_id" .
-			" FROM `##user` u" .
-			" LEFT JOIN `##user_setting` us ON (u.user_id=us.user_id AND us.setting_name='reg_timestamp') " .
-			" ORDER BY us.setting_value DESC LIMIT 1"
-		)->execute()->fetchOne();
-
-		return self::find($user_id);
-	}
-
-	/**
-	 * Create a new user.
-	 *
-	 * The calling code needs to check for duplicates identifiers before calling
-	 * this function.
-	 *
-	 * @param string $user_name
-	 * @param string $real_name
-	 * @param string $email
-	 * @param string $password
-	 *
-	 * @return User
-	 */
-	public static function create($user_name, $real_name, $email, $password) {
-		Database::prepare(
-			"INSERT INTO `##user` (user_name, real_name, email, password) VALUES (:user_name, :real_name, :email, :password)"
-		)->execute(array(
-			'user_name' => $user_name,
-			'real_name' => $real_name,
-			'email'     => $email,
-			'password'  => self::passwordHash($password),
-		));
-
-		// Set default blocks for this user
-		$user = self::findByIdentifier($user_name);
-		Database::prepare(
-			"INSERT INTO `##block` (`user_id`, `location`, `block_order`, `module_name`)" .
-			" SELECT :user_id , `location`, `block_order`, `module_name` FROM `##block` WHERE `user_id` = -1"
-		)->execute(array('user_id' => $user->getUserId()));
-
-		return $user;
-	}
-
-	/**
-	 * Get a count of all users.
-	 *
-	 * @return int
-	 */
-	public static function count() {
-		return (int) Database::prepare(
-			"SELECT COUNT(*)" .
-			" FROM `##user`" .
-			" WHERE user_id > 0"
-		)->fetchOne();
-	}
-
-	/**
-	 * Get a list of all users.
-	 *
-	 * @return User[]
-	 */
-	public static function all() {
-		$users = array();
-
-		$rows = Database::prepare(
-			"SELECT user_id, user_name, real_name, email" .
-			" FROM `##user`" .
-			" WHERE user_id > 0" .
-			" ORDER BY user_name"
-		)->fetchAll();
-
-		foreach ($rows as $row) {
-			$users[] = new self($row);
-		}
-
-		return $users;
-	}
-
-	/**
-	 * Get a list of all administrators.
-	 *
-	 * @return User[]
-	 */
-	public static function allAdmins() {
-		$rows = Database::prepare(
-			"SELECT user_id, user_name, real_name, email" .
-			" FROM `##user`" .
-			" JOIN `##user_setting` USING (user_id)" .
-			" WHERE user_id > 0" .
-			"   AND setting_name = 'canadmin'" .
-			"   AND setting_value = '1'"
-		)->fetchAll();
-
-		$users = array();
-		foreach ($rows as $row) {
-			$users[] = new self($row);
-		}
-
-		return $users;
-	}
-
-	/**
-	 * Get a list of all verified uses.
-	 *
-	 * @return User[]
-	 */
-	public static function allVerified() {
-		$rows = Database::prepare(
-			"SELECT user_id, user_name, real_name, email" .
-			" FROM `##user`" .
-			" JOIN `##user_setting` USING (user_id)" .
-			" WHERE user_id > 0" .
-			"   AND setting_name = 'verified'" .
-			"   AND setting_value = '1'"
-		)->fetchAll();
-
-		$users = array();
-		foreach ($rows as $row) {
-			$users[] = new self($row);
-		}
-
-		return $users;
-	}
-
-	/**
-	 * Get a list of all users who are currently logged in.
-	 *
-	 * @return User[]
-	 */
-	public static function allLoggedIn() {
-		$rows = Database::prepare(
-			"SELECT DISTINCT user_id, user_name, real_name, email" .
-			" FROM `##user`" .
-			" JOIN `##session` USING (user_id)"
-		)->fetchAll();
-
-		$users = array();
-		foreach ($rows as $row) {
-			$users[] = new self($row);
-		}
-
-		return $users;
-	}
-
-	/**
-	 * Create a new user object from a row in the database.
-	 *
-	 * @param \stdclass $user A row from the wt_user table
-	 */
-	public function __construct(\stdClass $user) {
-		$this->user_id   = $user->user_id;
-		$this->user_name = $user->user_name;
-		$this->real_name = $user->real_name;
-		$this->email     = $user->email;
-	}
-
-	/**
-	 * Delete a user
-	 */
-	public function delete() {
-		// Don't delete the logs.
-		Database::prepare("UPDATE `##log` SET user_id=NULL WHERE user_id =?")->execute(array($this->user_id));
-		// Take over the user’s pending changes. (What else could we do with them?)
-		Database::prepare("DELETE FROM `##change` WHERE user_id=? AND status='rejected'")->execute(array($this->user_id));
-		Database::prepare("UPDATE `##change` SET user_id=? WHERE user_id=?")->execute(array(Auth::id(), $this->user_id));
-		Database::prepare("DELETE `##block_setting` FROM `##block_setting` JOIN `##block` USING (block_id) WHERE user_id=?")->execute(array($this->user_id));
-		Database::prepare("DELETE FROM `##block` WHERE user_id=?")->execute(array($this->user_id));
-		Database::prepare("DELETE FROM `##user_gedcom_setting` WHERE user_id=?")->execute(array($this->user_id));
-		Database::prepare("DELETE FROM `##gedcom_setting` WHERE setting_value=? AND setting_name IN ('CONTACT_USER_ID', 'WEBMASTER_USER_ID')")->execute(array((string) $this->user_id));
-		Database::prepare("DELETE FROM `##user_setting` WHERE user_id=?")->execute(array($this->user_id));
-		Database::prepare("DELETE FROM `##message` WHERE user_id=?")->execute(array($this->user_id));
-		Database::prepare("DELETE FROM `##user` WHERE user_id=?")->execute(array($this->user_id));
-	}
-
-	/** Validate a supplied password
-	 * @param string $password
-	 *
-	 * @return bool
-	 */
-	public function checkPassword($password) {
-		$password_hash = Database::prepare(
-			"SELECT password FROM `##user` WHERE user_id = ?"
-		)->execute(array($this->user_id))->fetchOne();
-
-		if ($this->passwordVerify($password, $password_hash)) {
-			if ($this->passwordNeedsRehash($password_hash)) {
-				$this->setPassword($password);
-			}
-
-			return true;
-		} else {
-			return false;
-		}
-	}
-
-	/**
-	 * Get the numeric ID for this user.
-	 *
-	 * @return string
-	 */
-	public function getUserId() {
-		return $this->user_id;
-	}
-
-	/**
-	 * Get the login name for this user.
-	 *
-	 * @return string
-	 */
-	public function getUserName() {
-		return $this->user_name;
-	}
-
-	/**
-	 * Set the login name for this user.
-	 *
-	 * @param string $user_name
-	 *
-	 * @return $this
-	 */
-	public function setUserName($user_name) {
-		if ($this->user_name !== $user_name) {
-			$this->user_name = $user_name;
-			Database::prepare(
-				"UPDATE `##user` SET user_name = ? WHERE user_id = ?"
-			)->execute(array($user_name, $this->user_id));
-		}
-
-		return $this;
-	}
-
-	/**
-	 * Get the real name of this user.
-	 *
-	 * @return string
-	 */
-	public function getRealName() {
-		return $this->real_name;
-	}
-
-	/**
-	 * Get the real name of this user, for display on screen.
-	 *
-	 * @return string
-	 */
-	public function getRealNameHtml() {
-		return '<span dir="auto">' . Filter::escapeHtml($this->real_name) . '</span>';
-	}
-
-	/**
-	 * Set the real name of this user.
-	 *
-	 * @param string $real_name
-	 *
-	 * @return User
-	 */
-	public function setRealName($real_name) {
-		if ($this->real_name !== $real_name) {
-			$this->real_name = $real_name;
-			Database::prepare(
-				"UPDATE `##user` SET real_name = ? WHERE user_id = ?"
-			)->execute(array($real_name, $this->user_id));
-		}
-
-		return $this;
-	}
-
-	/**
-	 * Get the email address of this user.
-	 *
-	 * @return string
-	 */
-	public function getEmail() {
-		return $this->email;
-	}
-
-	/**
-	 * Set the email address of this user.
-	 *
-	 * @param string $email
-	 *
-	 * @return User
-	 */
-	public function setEmail($email) {
-		if ($this->email !== $email) {
-			$this->email = $email;
-			Database::prepare(
-				"UPDATE `##user` SET email = ? WHERE user_id = ?"
-			)->execute(array($email, $this->user_id));
-		}
-
-		return $this;
-	}
-
-	/**
-	 * Set the password of this user.
-	 *
-	 * @param string $password
-	 *
-	 * @return User
-	 */
-	public function setPassword($password) {
-		Database::prepare(
-			"UPDATE `##user` SET password = ? WHERE user_id = ?"
-		)->execute(array($this->passwordHash($password), $this->user_id));
-
-		return $this;
-	}
-
-	/**
-	 * Fetch a user option/setting from the wt_user_setting table.
-	 *
-	 * Since we'll fetch several settings for each user, and since there aren’t
-	 * that many of them, fetch them all in one database query
-	 *
-	 * @param string      $setting_name
-	 * @param string|null $default
-	 *
-	 * @return string|null
-	 */
-	public function getPreference($setting_name, $default = null) {
-		if ($this->preferences === null) {
-			if ($this->user_id) {
-				$this->preferences = Database::prepare(
-					"SELECT setting_name, setting_value FROM `##user_setting` WHERE user_id = ?"
-				)->execute(array($this->user_id))->fetchAssoc();
-			} else {
-				// Not logged in? We have no preferences.
-				$this->preferences = array();
-			}
-		}
-
-		if (array_key_exists($setting_name, $this->preferences)) {
-			return $this->preferences[$setting_name];
-		} else {
-			return $default;
-		}
-	}
-
-	/**
-	 * Update a setting for the user.
-	 *
-	 * @param string $setting_name
-	 * @param string $setting_value
-	 *
-	 * @return User
-	 */
-	public function setPreference($setting_name, $setting_value) {
-		if ($this->user_id && $this->getPreference($setting_name) !== $setting_value) {
-			Database::prepare("REPLACE INTO `##user_setting` (user_id, setting_name, setting_value) VALUES (?, ?, LEFT(?, 255))")
-				->execute(array($this->user_id, $setting_name, $setting_value));
-			$this->preferences[$setting_name] = $setting_value;
-		}
-
-		return $this;
-	}
-
-	/**
-	 * Delete a setting for the user.
-	 *
-	 * @param string $setting_name
-	 *
-	 * @return User
-	 */
-	public function deletePreference($setting_name) {
-		if ($this->user_id && $this->getPreference($setting_name) !== null) {
-			Database::prepare("DELETE FROM `##user_setting` WHERE user_id = ? AND setting_name = ?")
-				->execute(array($this->user_id, $setting_name));
-			unset($this->preferences[$setting_name]);
-		}
-
-		return $this;
-	}
-
-	/**
-	 * The ircmaxell/password_compat implementation of the password_hash() function
-	 * relies on an encryption library which is not secure in PHP < 5.3.7
-	 *
-	 * @return bool
-	 */
-	private static function isPhpCryptBroken() {
-		return PHP_VERSION_ID < 50307 && password_hash('foo', PASSWORD_DEFAULT) === false;
-	}
-
-	/**
-	 * @param string $password
-	 *
-	 * @return string
-	 */
-	private static function passwordHash($password) {
-		if (self::isPhpCryptBroken()) {
-			return crypt($password);
-		} else {
-			return password_hash($password, PASSWORD_DEFAULT);
-		}
-	}
-
-	/**
-	 * @param string $hash
-	 *
-	 * @return bool
-	 */
-	private static function passwordNeedsRehash($hash) {
-		if (self::isPhpCryptBroken()) {
-			return false;
-		} else {
-			return password_needs_rehash($hash, PASSWORD_DEFAULT);
-		}
-	}
-
-	/**
-	 * @param string $password
-	 * @param string $hash
-	 *
-	 * @return bool
-	 */
-	private static function passwordVerify($password, $hash) {
-		if (self::isPhpCryptBroken()) {
-			return crypt($password, $hash) === $hash;
-		} else {
-			return password_verify($password, $hash);
-		}
-	}
+    /** @var  string The primary key of this user. */
+    private $user_id;
+
+    /** @var  string The login name of this user. */
+    private $user_name;
+
+    /** @var  string The real (display) name of this user. */
+    private $real_name;
+
+    /** @var  string The email address of this user. */
+    private $email;
+
+    /** @var array Cached copy of the wt_user_setting table. */
+    private $preferences;
+
+    /** @var  User[] Only fetch users from the database once. */
+    private static $cache = array();
+
+    /**
+     * Find the user with a specified user_id.
+     *
+     * @param int|null $user_id
+     *
+     * @return User|null
+     */
+    public static function find($user_id) {
+        if (!array_key_exists($user_id, self::$cache)) {
+            $row = Database::prepare(
+                "SELECT user_id, user_name, real_name, email FROM `##user` WHERE user_id = ?"
+            )->execute(array($user_id))->fetchOneRow();
+            if ($row) {
+                self::$cache[$user_id] = new self($row);
+            } else {
+                self::$cache[$user_id] = null;
+            }
+        }
+
+        return self::$cache[$user_id];
+    }
+
+    /**
+     * Find the user with a specified user_name.
+     *
+     * @param string $user_name
+     *
+     * @return User|null
+     */
+    public static function findByUserName($user_name) {
+        $user_id = Database::prepare(
+            "SELECT user_id FROM `##user` WHERE user_name = :user_name"
+        )->execute(array(
+            'user_name' => $user_name,
+        ))->fetchOne();
+
+        return self::find($user_id);
+    }
+
+    /**
+     * Find the user with a specified email address.
+     *
+     * @param string $email
+     *
+     * @return User|null
+     */
+    public static function findByEmail($email) {
+        $user_id = Database::prepare(
+            "SELECT user_id FROM `##user` WHERE email = :email"
+        )->execute(array(
+            'email' => $email,
+        ))->fetchOne();
+
+        return self::find($user_id);
+    }
+
+    /**
+     * Find the user with a specified user_name or email address.
+     *
+     * @param string $identifier
+     *
+     * @return User|null
+     */
+    public static function findByIdentifier($identifier) {
+        $user_id = Database::prepare(
+            "SELECT user_id FROM `##user` WHERE ? IN (user_name, email)"
+        )->execute(array($identifier))->fetchOne();
+
+        return self::find($user_id);
+    }
+
+    /**
+     * Find the user with a specified genealogy record.
+     *
+     * @param Individual $individual
+     *
+     * @return User|null
+     */
+    public static function findByGenealogyRecord(Individual $individual) {
+        $user_id = Database::prepare(
+            "SELECT user_id" .
+            " FROM `##user_gedcom_setting`" .
+            " WHERE gedcom_id = :tree_id AND setting_name = 'gedcomid' AND setting_value = :xref"
+        )->execute(array(
+            'tree_id' => $individual->getTree()->getTreeId(),
+            'xref'    => $individual->getXref(),
+        ))->fetchOne();
+
+        return self::find($user_id);
+    }
+
+    /**
+     * Find the latest user to register.
+     *
+     * @return User|null
+     */
+    public static function findLatestToRegister() {
+        $user_id = Database::prepare(
+            "SELECT u.user_id" .
+            " FROM `##user` u" .
+            " LEFT JOIN `##user_setting` us ON (u.user_id=us.user_id AND us.setting_name='reg_timestamp') " .
+            " ORDER BY us.setting_value DESC LIMIT 1"
+        )->execute()->fetchOne();
+
+        return self::find($user_id);
+    }
+
+    /**
+     * Create a new user.
+     *
+     * The calling code needs to check for duplicates identifiers before calling
+     * this function.
+     *
+     * @param string $user_name
+     * @param string $real_name
+     * @param string $email
+     * @param string $password
+     *
+     * @return User
+     */
+    public static function create($user_name, $real_name, $email, $password) {
+        Database::prepare(
+            "INSERT INTO `##user` (user_name, real_name, email, password) VALUES (:user_name, :real_name, :email, :password)"
+        )->execute(array(
+            'user_name' => $user_name,
+            'real_name' => $real_name,
+            'email'     => $email,
+            'password'  => self::passwordHash($password),
+        ));
+
+        // Set default blocks for this user
+        $user = self::findByIdentifier($user_name);
+        Database::prepare(
+            "INSERT INTO `##block` (`user_id`, `location`, `block_order`, `module_name`)" .
+            " SELECT :user_id , `location`, `block_order`, `module_name` FROM `##block` WHERE `user_id` = -1"
+        )->execute(array('user_id' => $user->getUserId()));
+
+        return $user;
+    }
+
+    /**
+     * Get a count of all users.
+     *
+     * @return int
+     */
+    public static function count() {
+        return (int) Database::prepare(
+            "SELECT COUNT(*)" .
+            " FROM `##user`" .
+            " WHERE user_id > 0"
+        )->fetchOne();
+    }
+
+    /**
+     * Get a list of all users.
+     *
+     * @return User[]
+     */
+    public static function all() {
+        $users = array();
+
+        $rows = Database::prepare(
+            "SELECT user_id, user_name, real_name, email" .
+            " FROM `##user`" .
+            " WHERE user_id > 0" .
+            " ORDER BY user_name"
+        )->fetchAll();
+
+        foreach ($rows as $row) {
+            $users[] = new self($row);
+        }
+
+        return $users;
+    }
+
+    /**
+     * Get a list of all administrators.
+     *
+     * @return User[]
+     */
+    public static function allAdmins() {
+        $rows = Database::prepare(
+            "SELECT user_id, user_name, real_name, email" .
+            " FROM `##user`" .
+            " JOIN `##user_setting` USING (user_id)" .
+            " WHERE user_id > 0" .
+            "   AND setting_name = 'canadmin'" .
+            "   AND setting_value = '1'"
+        )->fetchAll();
+
+        $users = array();
+        foreach ($rows as $row) {
+            $users[] = new self($row);
+        }
+
+        return $users;
+    }
+
+    /**
+     * Get a list of all verified uses.
+     *
+     * @return User[]
+     */
+    public static function allVerified() {
+        $rows = Database::prepare(
+            "SELECT user_id, user_name, real_name, email" .
+            " FROM `##user`" .
+            " JOIN `##user_setting` USING (user_id)" .
+            " WHERE user_id > 0" .
+            "   AND setting_name = 'verified'" .
+            "   AND setting_value = '1'"
+        )->fetchAll();
+
+        $users = array();
+        foreach ($rows as $row) {
+            $users[] = new self($row);
+        }
+
+        return $users;
+    }
+
+    /**
+     * Get a list of all users who are currently logged in.
+     *
+     * @return User[]
+     */
+    public static function allLoggedIn() {
+        $rows = Database::prepare(
+            "SELECT DISTINCT user_id, user_name, real_name, email" .
+            " FROM `##user`" .
+            " JOIN `##session` USING (user_id)"
+        )->fetchAll();
+
+        $users = array();
+        foreach ($rows as $row) {
+            $users[] = new self($row);
+        }
+
+        return $users;
+    }
+
+    /**
+     * Create a new user object from a row in the database.
+     *
+     * @param \stdclass $user A row from the wt_user table
+     */
+    public function __construct(\stdClass $user) {
+        $this->user_id   = $user->user_id;
+        $this->user_name = $user->user_name;
+        $this->real_name = $user->real_name;
+        $this->email     = $user->email;
+    }
+
+    /**
+     * Delete a user
+     */
+    public function delete() {
+        // Don't delete the logs.
+        Database::prepare("UPDATE `##log` SET user_id=NULL WHERE user_id =?")->execute(array($this->user_id));
+        // Take over the user’s pending changes. (What else could we do with them?)
+        Database::prepare("DELETE FROM `##change` WHERE user_id=? AND status='rejected'")->execute(array($this->user_id));
+        Database::prepare("UPDATE `##change` SET user_id=? WHERE user_id=?")->execute(array(Auth::id(), $this->user_id));
+        Database::prepare("DELETE `##block_setting` FROM `##block_setting` JOIN `##block` USING (block_id) WHERE user_id=?")->execute(array($this->user_id));
+        Database::prepare("DELETE FROM `##block` WHERE user_id=?")->execute(array($this->user_id));
+        Database::prepare("DELETE FROM `##user_gedcom_setting` WHERE user_id=?")->execute(array($this->user_id));
+        Database::prepare("DELETE FROM `##gedcom_setting` WHERE setting_value=? AND setting_name IN ('CONTACT_USER_ID', 'WEBMASTER_USER_ID')")->execute(array((string) $this->user_id));
+        Database::prepare("DELETE FROM `##user_setting` WHERE user_id=?")->execute(array($this->user_id));
+        Database::prepare("DELETE FROM `##message` WHERE user_id=?")->execute(array($this->user_id));
+        Database::prepare("DELETE FROM `##user` WHERE user_id=?")->execute(array($this->user_id));
+    }
+
+    /** Validate a supplied password
+     * @param string $password
+     *
+     * @return bool
+     */
+    public function checkPassword($password) {
+        $password_hash = Database::prepare(
+            "SELECT password FROM `##user` WHERE user_id = ?"
+        )->execute(array($this->user_id))->fetchOne();
+
+        if ($this->passwordVerify($password, $password_hash)) {
+            if ($this->passwordNeedsRehash($password_hash)) {
+                $this->setPassword($password);
+            }
+
+            return true;
+        } else {
+            return false;
+        }
+    }
+
+    /**
+     * Get the numeric ID for this user.
+     *
+     * @return string
+     */
+    public function getUserId() {
+        return $this->user_id;
+    }
+
+    /**
+     * Get the login name for this user.
+     *
+     * @return string
+     */
+    public function getUserName() {
+        return $this->user_name;
+    }
+
+    /**
+     * Set the login name for this user.
+     *
+     * @param string $user_name
+     *
+     * @return $this
+     */
+    public function setUserName($user_name) {
+        if ($this->user_name !== $user_name) {
+            $this->user_name = $user_name;
+            Database::prepare(
+                "UPDATE `##user` SET user_name = ? WHERE user_id = ?"
+            )->execute(array($user_name, $this->user_id));
+        }
+
+        return $this;
+    }
+
+    /**
+     * Get the real name of this user.
+     *
+     * @return string
+     */
+    public function getRealName() {
+        return $this->real_name;
+    }
+
+    /**
+     * Get the real name of this user, for display on screen.
+     *
+     * @return string
+     */
+    public function getRealNameHtml() {
+        return '<span dir="auto">' . Filter::escapeHtml($this->real_name) . '</span>';
+    }
+
+    /**
+     * Set the real name of this user.
+     *
+     * @param string $real_name
+     *
+     * @return User
+     */
+    public function setRealName($real_name) {
+        if ($this->real_name !== $real_name) {
+            $this->real_name = $real_name;
+            Database::prepare(
+                "UPDATE `##user` SET real_name = ? WHERE user_id = ?"
+            )->execute(array($real_name, $this->user_id));
+        }
+
+        return $this;
+    }
+
+    /**
+     * Get the email address of this user.
+     *
+     * @return string
+     */
+    public function getEmail() {
+        return $this->email;
+    }
+
+    /**
+     * Set the email address of this user.
+     *
+     * @param string $email
+     *
+     * @return User
+     */
+    public function setEmail($email) {
+        if ($this->email !== $email) {
+            $this->email = $email;
+            Database::prepare(
+                "UPDATE `##user` SET email = ? WHERE user_id = ?"
+            )->execute(array($email, $this->user_id));
+        }
+
+        return $this;
+    }
+
+    /**
+     * Set the password of this user.
+     *
+     * @param string $password
+     *
+     * @return User
+     */
+    public function setPassword($password) {
+        Database::prepare(
+            "UPDATE `##user` SET password = ? WHERE user_id = ?"
+        )->execute(array($this->passwordHash($password), $this->user_id));
+
+        return $this;
+    }
+
+    /**
+     * Fetch a user option/setting from the wt_user_setting table.
+     *
+     * Since we'll fetch several settings for each user, and since there aren’t
+     * that many of them, fetch them all in one database query
+     *
+     * @param string      $setting_name
+     * @param string|null $default
+     *
+     * @return string|null
+     */
+    public function getPreference($setting_name, $default = null) {
+        if ($this->preferences === null) {
+            if ($this->user_id) {
+                $this->preferences = Database::prepare(
+                    "SELECT setting_name, setting_value FROM `##user_setting` WHERE user_id = ?"
+                )->execute(array($this->user_id))->fetchAssoc();
+            } else {
+                // Not logged in? We have no preferences.
+                $this->preferences = array();
+            }
+        }
+
+        if (array_key_exists($setting_name, $this->preferences)) {
+            return $this->preferences[$setting_name];
+        } else {
+            return $default;
+        }
+    }
+
+    /**
+     * Update a setting for the user.
+     *
+     * @param string $setting_name
+     * @param string $setting_value
+     *
+     * @return User
+     */
+    public function setPreference($setting_name, $setting_value) {
+        if ($this->user_id && $this->getPreference($setting_name) !== $setting_value) {
+            Database::prepare("REPLACE INTO `##user_setting` (user_id, setting_name, setting_value) VALUES (?, ?, LEFT(?, 255))")
+                ->execute(array($this->user_id, $setting_name, $setting_value));
+            $this->preferences[$setting_name] = $setting_value;
+        }
+
+        return $this;
+    }
+
+    /**
+     * Delete a setting for the user.
+     *
+     * @param string $setting_name
+     *
+     * @return User
+     */
+    public function deletePreference($setting_name) {
+        if ($this->user_id && $this->getPreference($setting_name) !== null) {
+            Database::prepare("DELETE FROM `##user_setting` WHERE user_id = ? AND setting_name = ?")
+                ->execute(array($this->user_id, $setting_name));
+            unset($this->preferences[$setting_name]);
+        }
+
+        return $this;
+    }
+
+    /**
+     * The ircmaxell/password_compat implementation of the password_hash() function
+     * relies on an encryption library which is not secure in PHP < 5.3.7
+     *
+     * @return bool
+     */
+    private static function isPhpCryptBroken() {
+        return PHP_VERSION_ID < 50307 && password_hash('foo', PASSWORD_DEFAULT) === false;
+    }
+
+    /**
+     * @param string $password
+     *
+     * @return string
+     */
+    private static function passwordHash($password) {
+        if (self::isPhpCryptBroken()) {
+            return crypt($password);
+        } else {
+            return password_hash($password, PASSWORD_DEFAULT);
+        }
+    }
+
+    /**
+     * @param string $hash
+     *
+     * @return bool
+     */
+    private static function passwordNeedsRehash($hash) {
+        if (self::isPhpCryptBroken()) {
+            return false;
+        } else {
+            return password_needs_rehash($hash, PASSWORD_DEFAULT);
+        }
+    }
+
+    /**
+     * @param string $password
+     * @param string $hash
+     *
+     * @return bool
+     */
+    private static function passwordVerify($password, $hash) {
+        if (self::isPhpCryptBroken()) {
+            return crypt($password, $hash) === $hash;
+        } else {
+            return password_verify($password, $hash);
+        }
+    }
 }

Braces +64 added lines, -32 removed lines

@@ -18,7 +18,8 @@ 
 /**
  * Provide an interface to the wt_user table.
  */
-class User {
+class User
+{
 	/** @var  string The primary key of this user. */
 	private $user_id;
 
@@ -44,7 +45,8 @@ 
 	 *
 	 * @return User|null
 	 */
-	public static function find($user_id) {
+	public static function find($user_id)
+	{
 		if (!array_key_exists($user_id, self::$cache)) {
 			$row = Database::prepare(
 				"SELECT user_id, user_name, real_name, email FROM `##user` WHERE user_id = ?"
@@ -66,7 +68,8 @@ 
 	 *
 	 * @return User|null
 	 */
-	public static function findByUserName($user_name) {
+	public static function findByUserName($user_name)
+	{
 		$user_id = Database::prepare(
 			"SELECT user_id FROM `##user` WHERE user_name = :user_name"
 		)->execute(array(
@@ -83,7 +86,8 @@ 
 	 *
 	 * @return User|null
 	 */
-	public static function findByEmail($email) {
+	public static function findByEmail($email)
+	{
 		$user_id = Database::prepare(
 			"SELECT user_id FROM `##user` WHERE email = :email"
 		)->execute(array(
@@ -100,7 +104,8 @@ 
 	 *
 	 * @return User|null
 	 */
-	public static function findByIdentifier($identifier) {
+	public static function findByIdentifier($identifier)
+	{
 		$user_id = Database::prepare(
 			"SELECT user_id FROM `##user` WHERE ? IN (user_name, email)"
 		)->execute(array($identifier))->fetchOne();
@@ -115,7 +120,8 @@ 
 	 *
 	 * @return User|null
 	 */
-	public static function findByGenealogyRecord(Individual $individual) {
+	public static function findByGenealogyRecord(Individual $individual)
+	{
 		$user_id = Database::prepare(
 			"SELECT user_id" .
 			" FROM `##user_gedcom_setting`" .
@@ -133,7 +139,8 @@ 
 	 *
 	 * @return User|null
 	 */
-	public static function findLatestToRegister() {
+	public static function findLatestToRegister()
+	{
 		$user_id = Database::prepare(
 			"SELECT u.user_id" .
 			" FROM `##user` u" .
@@ -157,7 +164,8 @@ 
 	 *
 	 * @return User
 	 */
-	public static function create($user_name, $real_name, $email, $password) {
+	public static function create($user_name, $real_name, $email, $password)
+	{
 		Database::prepare(
 			"INSERT INTO `##user` (user_name, real_name, email, password) VALUES (:user_name, :real_name, :email, :password)"
 		)->execute(array(
@@ -182,7 +190,8 @@ 
 	 *
 	 * @return int
 	 */
-	public static function count() {
+	public static function count()
+	{
 		return (int) Database::prepare(
 			"SELECT COUNT(*)" .
 			" FROM `##user`" .
@@ -195,7 +204,8 @@ 
 	 *
 	 * @return User[]
 	 */
-	public static function all() {
+	public static function all()
+	{
 		$users = array();
 
 		$rows = Database::prepare(
@@ -217,7 +227,8 @@ 
 	 *
 	 * @return User[]
 	 */
-	public static function allAdmins() {
+	public static function allAdmins()
+	{
 		$rows = Database::prepare(
 			"SELECT user_id, user_name, real_name, email" .
 			" FROM `##user`" .
@@ -240,7 +251,8 @@ 
 	 *
 	 * @return User[]
 	 */
-	public static function allVerified() {
+	public static function allVerified()
+	{
 		$rows = Database::prepare(
 			"SELECT user_id, user_name, real_name, email" .
 			" FROM `##user`" .
@@ -263,7 +275,8 @@ 
 	 *
 	 * @return User[]
 	 */
-	public static function allLoggedIn() {
+	public static function allLoggedIn()
+	{
 		$rows = Database::prepare(
 			"SELECT DISTINCT user_id, user_name, real_name, email" .
 			" FROM `##user`" .
@@ -283,7 +296,8 @@ 
 	 *
 	 * @param \stdclass $user A row from the wt_user table
 	 */
-	public function __construct(\stdClass $user) {
+	public function __construct(\stdClass $user)
+	{
 		$this->user_id   = $user->user_id;
 		$this->user_name = $user->user_name;
 		$this->real_name = $user->real_name;
@@ -293,7 +307,8 @@ 
 	/**
 	 * Delete a user
 	 */
-	public function delete() {
+	public function delete()
+	{
 		// Don't delete the logs.
 		Database::prepare("UPDATE `##log` SET user_id=NULL WHERE user_id =?")->execute(array($this->user_id));
 		// Take over the user’s pending changes. (What else could we do with them?)
@@ -313,7 +328,8 @@ 
 	 *
 	 * @return bool
 	 */
-	public function checkPassword($password) {
+	public function checkPassword($password)
+	{
 		$password_hash = Database::prepare(
 			"SELECT password FROM `##user` WHERE user_id = ?"
 		)->execute(array($this->user_id))->fetchOne();
@@ -334,7 +350,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getUserId() {
+	public function getUserId()
+	{
 		return $this->user_id;
 	}
 
@@ -343,7 +360,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getUserName() {
+	public function getUserName()
+	{
 		return $this->user_name;
 	}
 
@@ -354,7 +372,8 @@ 
 	 *
 	 * @return $this
 	 */
-	public function setUserName($user_name) {
+	public function setUserName($user_name)
+	{
 		if ($this->user_name !== $user_name) {
 			$this->user_name = $user_name;
 			Database::prepare(
@@ -370,7 +389,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getRealName() {
+	public function getRealName()
+	{
 		return $this->real_name;
 	}
 
@@ -379,7 +399,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getRealNameHtml() {
+	public function getRealNameHtml()
+	{
 		return '<span dir="auto">' . Filter::escapeHtml($this->real_name) . '</span>';
 	}
 
@@ -390,7 +411,8 @@ 
 	 *
 	 * @return User
 	 */
-	public function setRealName($real_name) {
+	public function setRealName($real_name)
+	{
 		if ($this->real_name !== $real_name) {
 			$this->real_name = $real_name;
 			Database::prepare(
@@ -406,7 +428,8 @@ 
 	 *
 	 * @return string
 	 */
-	public function getEmail() {
+	public function getEmail()
+	{
 		return $this->email;
 	}
 
@@ -417,7 +440,8 @@ 
 	 *
 	 * @return User
 	 */
-	public function setEmail($email) {
+	public function setEmail($email)
+	{
 		if ($this->email !== $email) {
 			$this->email = $email;
 			Database::prepare(
@@ -435,7 +459,8 @@ 
 	 *
 	 * @return User
 	 */
-	public function setPassword($password) {
+	public function setPassword($password)
+	{
 		Database::prepare(
 			"UPDATE `##user` SET password = ? WHERE user_id = ?"
 		)->execute(array($this->passwordHash($password), $this->user_id));
@@ -454,7 +479,8 @@ 
 	 *
 	 * @return string|null
 	 */
-	public function getPreference($setting_name, $default = null) {
+	public function getPreference($setting_name, $default = null)
+	{
 		if ($this->preferences === null) {
 			if ($this->user_id) {
 				$this->preferences = Database::prepare(
@@ -481,7 +507,8 @@ 
 	 *
 	 * @return User
 	 */
-	public function setPreference($setting_name, $setting_value) {
+	public function setPreference($setting_name, $setting_value)
+	{
 		if ($this->user_id && $this->getPreference($setting_name) !== $setting_value) {
 			Database::prepare("REPLACE INTO `##user_setting` (user_id, setting_name, setting_value) VALUES (?, ?, LEFT(?, 255))")
 				->execute(array($this->user_id, $setting_name, $setting_value));
@@ -498,7 +525,8 @@ 
 	 *
 	 * @return User
 	 */
-	public function deletePreference($setting_name) {
+	public function deletePreference($setting_name)
+	{
 		if ($this->user_id && $this->getPreference($setting_name) !== null) {
 			Database::prepare("DELETE FROM `##user_setting` WHERE user_id = ? AND setting_name = ?")
 				->execute(array($this->user_id, $setting_name));
@@ -514,7 +542,8 @@ 
 	 *
 	 * @return bool
 	 */
-	private static function isPhpCryptBroken() {
+	private static function isPhpCryptBroken()
+	{
 		return PHP_VERSION_ID < 50307 && password_hash('foo', PASSWORD_DEFAULT) === false;
 	}
 
@@ -523,7 +552,8 @@ 
 	 *
 	 * @return string
 	 */
-	private static function passwordHash($password) {
+	private static function passwordHash($password)
+	{
 		if (self::isPhpCryptBroken()) {
 			return crypt($password);
 		} else {
@@ -536,7 +566,8 @@ 
 	 *
 	 * @return bool
 	 */
-	private static function passwordNeedsRehash($hash) {
+	private static function passwordNeedsRehash($hash)
+	{
 		if (self::isPhpCryptBroken()) {
 			return false;
 		} else {
@@ -550,7 +581,8 @@ 
 	 *
 	 * @return bool
 	 */
-	private static function passwordVerify($password, $hash) {
+	private static function passwordVerify($password, $hash)
+	{
 		if (self::isPhpCryptBroken()) {
 			return crypt($password, $hash) === $hash;
 		} else {