Merge branch 'master' of github-tsch-brown:browngraphicslab/Dash-Web

2 files changed, 6 insertions, 1 deletions

diff --git a/src/fields/Document.ts b/src/fields/Document.ts
index 4945d1474..0551a74b0 100644
--- a/src/fields/Document.ts
+++ b/src/fields/Document.ts
@@ -1,12 +1,16 @@
 import { Field, Cast, Opt } from "./Field"
 import { Key, KeyStore } from "./Key"
-import { ObservableMap } from "mobx";
 import { NumberField } from "./NumberField";
+import { ObservableMap, computed } from "mobx";
 import { TextField } from "./TextField";
 
 export class Document extends Field {
     private fields: ObservableMap<Key, Field> = new ObservableMap();
 
+    static _untitledDocName = "<untitled>";
+    @computed
+    public get Title() { return this.GetFieldValue(KeyStore.Title, TextField, Document._untitledDocName); }
+
     GetField(key: Key, ignoreProto: boolean = false): Opt<Field> {
         let field: Opt<Field>;
         if (ignoreProto) {
diff --git a/src/fields/Key.ts b/src/fields/Key.ts
index f8418d5c0..61b3cdd37 100644
--- a/src/fields/Key.ts
+++ b/src/fields/Key.ts
@@ -34,6 +34,7 @@ export namespace KeyStore {
     export let Prototype = new Key("Prototype");
     export let X = new Key("X");
     export let Y = new Key("Y");
+    export let Title = new Key("Title");
     export let PanX = new Key("PanX");
     export let PanY = new Key("PanY");
     export let Scale = new Key("Scale");