Changeset e075479

Timestamp:

Jun 26, 2003, 6:20:04 AM (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:

8d24696

Parents:

ceb8cfb

Message:

Set the default_style appropriately.

File:

• owl.c (modified) (3 diffs)

owl.c

@@ -227 +227 @@
   }
 
-  /* if the config defaults a formatting function, add 'perl' as a style */
+  /* if the config defines a formatting function, add 'perl' as a style */
   if (owl_global_is_config_format(&g)) {
     owl_function_debugmsg("Found perl formatting");
@@ -233 +233 @@
     owl_style_create_perl(s, "perl", "owl::format_msg");
     owl_global_add_style(&g, s);
+    owl_global_set_default_style(&g, "perl");
   }
 
@@ -268 +269 @@
   }
 
-  /* set the default style, based on userclue and presence of a
-   *  formatting function */
+  /* set the startup and default style, based on userclue and presence of a
+   * formatting function */
   if (owl_global_is_config_format(&g)) {
     owl_view_set_style(owl_global_get_current_view(&g), owl_global_get_style_by_name(&g, "perl"));
+    owl_global_set_default_style(&g, "perl");
   } else if (owl_global_is_userclue(&g, OWL_USERCLUE_CLASSES)) {
     owl_view_set_style(owl_global_get_current_view(&g), owl_global_get_style_by_name(&g, "default"));
+    owl_global_set_default_style(&g, "default");
   } else {
     owl_view_set_style(owl_global_get_current_view(&g), owl_global_get_style_by_name(&g, "basic"));
+    owl_global_set_default_style(&g, "basic");
   }