Changeset 291 in kBuild

Timestamp:

May 23, 2005 12:49:53 AM (20 years ago)

Author:

bird

Message:

Replace p_index lest we change the global extension setup.

File:

• trunk/VSlickMacros/kdev.e (modified) (5 diffs)

trunk/VSlickMacros/kdev.e

@@ -2323 +2323 @@
     if (sVar == '' || sVal == '')
         return -1;
-    say 'k_style_emacs_var: 'sVar'='sVal;
+    //say 'k_style_emacs_var: 'sVar'='sVal;
 
     /* 
@@ -2382 +2382 @@
             switch (sVal)
             {
+                case 'bsd':
+                case '"bsd"':
                 case 'BSD':
-                case 'bsd':
                     iBeginEndStyle = 1 | (iBeginEndStyle & ~3);
                     p_indent_with_tabs = true;
@@ -2393 +2394 @@
 
                 case 'k&r':
+                case '"k&r"':
                 case 'K&R':
                     iBeginEndStyle = 0 | (iBeginEndStyle & ~3);
@@ -2403 +2405 @@
 
                 case 'linux-c':
+                case '"linux-c"':
                     iBeginEndStyle = 0 | (iBeginEndStyle & ~3);
                     p_indent_with_tabs = true;
@@ -2491 +2494 @@
         && sStyleName == p_mode_name)
     {
+        _str sName = name_name(_edit_window().p_index)
         //say '   sStyle='sStyle' p_mode_name='p_mode_name;
-        //say 'sNewStyle='sNewStyle;
-        set_name_info(_edit_window().p_index, sNewStyle);
+        //say 'sNewStyle='sNewStyle' sName='sName;
+        if (pos('kstyledoc-', sName) <= 0) 
+        {
+            sName = 'def-kstyledoc-'p_buf_id;
+            int idx = insert_name(sName, MISC_TYPE, "kstyledoc");
+            if (!idx)
+                idx = find_index(sName, MISC_TYPE);
+            if (idx)
+            {
+                if (!set_name_info(idx, sNewStyle))
+                    _edit_window().p_index = idx;
+            }
+            //say sName'='idx;
+        }             
+        else
+            set_name_info(_edit_window().p_index, sNewStyle);
     }