Changeset bd3f232 for global.c

Timestamp:

Jun 10, 2003, 3:14:59 PM (21 years ago)

Author:

James M. Kretchmar <kretch@mit.edu>

Branches:

master, barnowl_perlaim, debian, owl, release-1.10, release-1.4, release-1.5, release-1.6, release-1.7, release-1.8, release-1.9

Children:

f14a7ee

Parents:

6e05655

Message:

Styles implemented
It's still a little buggy ... if a format_msg(); is used in perl admin
  messages (or maybe just the first admin message) are not formatted.

File:

• global.c (modified) (2 diffs)

global.c

@@ -52 +52 @@
   owl_list_create(&(g->puntlist));
   owl_list_create(&(g->messagequeue));
+  owl_list_create(&(g->stylelist));
   g->curmsg_vert_offset=0;
   g->resizepending=0;
@@ -728 +729 @@
 }
   
+/* style */
+
+/* Return the style with name 'name'.  If it does not exist return
+ * NULL */
+owl_style *owl_global_get_style_by_name(owl_global *g, char *name)
+{
+  int i, j;
+  owl_style *s;
+  
+  j=owl_list_get_size(&(g->stylelist));
+  for (i=0; i<j; i++) {
+    s=owl_list_get_element(&(g->stylelist), i);
+    if (owl_style_matches_name(s, name)) {
+      return(s);
+    }
+  }
+  return(NULL);
+}
+
+owl_style *owl_global_get_current_style(owl_global *g) {
+  return(owl_global_get_style_by_name(g, owl_global_get_style(g)));
+}
+
+void owl_global_add_style(owl_global *g, owl_style *s) {
+  owl_list_append_element(&(g->stylelist), s);
+}