From ffe93793928977d79d620e6f580ccff85f3983ef Mon Sep 17 00:00:00 2001
From: mitchell <70453897+667e-11@users.noreply.github.com>
Date: Tue, 30 Mar 2010 19:06:51 -0400
Subject: Added About dialog.

---
 core/ext/menu.lua | 7 +++++++
 core/init.lua     | 2 ++
 core/locale.conf  | 4 ++++
 3 files changed, 13 insertions(+)

(limited to 'core')

diff --git a/core/ext/menu.lua b/core/ext/menu.lua
index 8dc44b03..40b2bdfa 100644
--- a/core/ext/menu.lua
+++ b/core/ext/menu.lua
@@ -130,6 +130,7 @@ local ID = {
   -- Help
   MANUAL = 901,
   LUADOC = 902,
+  ABOUT = 903,
 }
 
 
@@ -285,6 +286,8 @@ local menubar = {
     title = l.MENU_HELP_TITLE,
     { l.MENU_HELP_MANUAL, ID.MANUAL },
     { l.MENU_HELP_LUADOC, ID.LUADOC },
+    { SEPARATOR, ID.SEPARATOR },
+    { l.MENU_HELP_ABOUT, ID.ABOUT },
   },
 }
 local lexer_menu = { title = l.MENU_LEX_TITLE }
@@ -486,6 +489,10 @@ local actions = {
   -- Help
   [ID.MANUAL] = { open_webpage, _HOME..'/doc/manual/1_Introduction.html' },
   [ID.LUADOC] = { open_webpage, _HOME..'/doc/index.html' },
+  [ID.ABOUT] = {
+    t.dialog, 'ok-msgbox', '--title', 'Textadept', '--informative-text',
+              _RELEASE, '--no-cancel'
+  },
 }
 if MAC then actions[ID.PASTE] = { m_editing.smart_paste } end -- fix paste issue
 
diff --git a/core/init.lua b/core/init.lua
index 505a3b45..f17ec196 100644
--- a/core/init.lua
+++ b/core/init.lua
@@ -1,5 +1,7 @@
 -- Copyright 2007-2010 Mitchell mitchell<att>caladbolg.net. See LICENSE.
 
+_RELEASE = "Textadept 2.2 beta"
+
 local textadept = _G.textadept
 
 package.path = _HOME..'/core/?.lua;'..package.path
diff --git a/core/locale.conf b/core/locale.conf
index 8d8bdb11..f7c1e519 100644
--- a/core/locale.conf
+++ b/core/locale.conf
@@ -619,6 +619,10 @@ MENU_HELP_MANUAL "_Manual"
 % "_LuaDoc"
 MENU_HELP_LUADOC "_LuaDoc"
 
+% core/ext/menu.lua
+% "gtk-about"
+MENU_HELP_ABOUT "gtk-about"
+
 % core/ext/menu.lua
 % "Error loading webpage: "
 MENU_BROWSER_ERROR "Error loading webpage: "
-- 
cgit v1.2.3