diff --git a/gui/ged/inc/TGedEditor.h b/gui/ged/inc/TGedEditor.h
index 5d51df2b4774e67e0661d0416d27065648bbdfdf..a9e2a6e64b11b477bdcb5497dd22b5b3d40bc492 100644
--- a/gui/ged/inc/TGedEditor.h
+++ b/gui/ged/inc/TGedEditor.h
@@ -72,6 +72,8 @@ protected:
 
    void              ConfigureGedFrames(Bool_t objChaged);
 
+   virtual TGedFrame* CreateNameFrame(const TGWindow* parent, const char* tab_name); 
+
    static TGedEditor *fgFrameCreator; 
 
 public:
diff --git a/gui/ged/src/TGedEditor.cxx b/gui/ged/src/TGedEditor.cxx
index 65fb5c66200bec8657d27fc2ba7540b8c2af939e..f631f5d05f6b3d559d0c7248eef4a206dd1573b1 100644
--- a/gui/ged/src/TGedEditor.cxx
+++ b/gui/ged/src/TGedEditor.cxx
@@ -214,7 +214,7 @@ TGedTabInfo* TGedEditor::GetEditorTabInfo(const char* name)
    fTab->RemoveFrame(te);
 
    // create a title frame for each tab
-   TGedNameFrame* nf = new TGedNameFrame(tc);
+   TGedFrame* nf = CreateNameFrame(tc, name);
    nf->SetGedEditor(this);
    nf->SetModelClass(0);
    tc->AddFrame(nf, nf->GetLayoutHints());
@@ -648,6 +648,14 @@ void TGedEditor::ConfigureGedFrames(Bool_t objChanged)
    fTabContainer->Layout();
 }
 
+//______________________________________________________________________________
+TGedFrame* TGedEditor::CreateNameFrame(const TGWindow* parent, const char* /*tab_name*/)
+{
+   // Virtual function for creation of top name-frame in each tab.
+
+   return new TGedNameFrame(parent);
+}
+
 //______________________________________________________________________________
 void TGedEditor::PrintFrameStat()
 {