From 021866de868fd074526fc63270639ec2f3ce9aa5 Mon Sep 17 00:00:00 2001
From: mitchell <70453897+667e-11@users.noreply.github.com>
Date: Sat, 4 Jul 2020 23:22:03 -0400
Subject: Added `buffer:style_of_name()` as an analogue to
 `buffer:name_of_style()`.

---
 core/init.lua | 12 +++++++++++-
 1 file changed, 11 insertions(+), 1 deletion(-)

(limited to 'core/init.lua')

diff --git a/core/init.lua b/core/init.lua
index 1768b1e2..07c9e060 100644
--- a/core/init.lua
+++ b/core/init.lua
@@ -54,7 +54,17 @@ local function text_range(buffer, start_pos, end_pos)
   buffer:set_target_range(target_start, target_end) -- restore
   return text
 end
-events.connect(events.BUFFER_NEW, function() buffer.text_range = text_range end)
+
+-- Documentation is in core/.buffer.luadoc.
+local function style_of_name(buffer, style_name)
+  assert_type(style_name, 'string', 2)
+  local GETNAMEDSTYLE = _SCINTILLA.properties.named_styles[1]
+  return buffer:private_lexer_call(GETNAMEDSTYLE, style_name)
+end
+
+events.connect(events.BUFFER_NEW, function()
+  buffer.text_range, buffer.style_of_name = text_range, style_of_name
+end)
 
 --[[ This comment is for LuaDoc.
 ---
-- 
cgit v1.2.3