Changeset c2c5c77 for util.c

Timestamp:

Mar 28, 2007, 10:54:33 PM (17 years ago)

Author:

Alejandro R. Sedeño <asedeno@mit.edu>

Branches:

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

Children:

7f33c18

Parents:

af9b92e

Message:

Adding 256-color support. This requires a version of ncurses that
supports ABI-6. Colors beyond the first eight are refered to by
number.

Perl now has the number of colors exposed to it by way of
  BarnOwl::getnumcolors()
and also has a mechanism for undefining filters using
  BarnOwl::_remove_filter([filter-name])

You can't remove the 'all' filter or the current filter.

File:

• util.c (modified) (3 diffs)

util.c

@@ -390 +390 @@
 }
 
+int owl_util_find_trans_short(short *in, int len)
+{
+  int i;
+  for (i=1; i<len; i++) {
+    if (in[i] != in[0]) return(i-1);
+  }
+  return(i);
+}
+
 /* downcase the string 'foo' */
 void downstr(char *foo)
@@ -488 +497 @@
 int owl_util_string_to_color(char *color)
 {
+  int c;
   if (!strcasecmp(color, "black")) {
     return(OWL_COLOR_BLACK);
@@ -507 +517 @@
     return(OWL_COLOR_DEFAULT);
   }
+  c = atoi(color);
+  if (c >= -1 && c < COLORS) {
+    return(c);
+  }
   return(-1);
 }