Changeset f7a61ef

Timestamp:

Dec 17, 2008, 3:00:21 PM (15 years ago)

Author:

Nelson Elhage <nelhage@mit.edu>

Branches:

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

Children:

c415aca

Parents:

3048f1f

Message:

Remove the unused owl_perlconfig_get_hashkeys

File:

• perlconfig.c (modified) (1 diff)

perlconfig.c

@@ -349 +349 @@
 }
 
-/* returns 0 on success */
-int owl_perlconfig_get_hashkeys(char *hashname, owl_list *l)
-{
-  HV *hv;
-  HE *he;
-  char *key;
-  I32 i;
-
-  if (owl_list_create(l)) return(-1);
-  hv = get_hv(hashname, FALSE);
-  if (!hv) return(-1);
-  i = hv_iterinit(hv);
-  while ((he = hv_iternext(hv))) {
-    key = hv_iterkey(he, &i);
-    if (key) {
-      owl_list_append_element(l, owl_strdup(key));
-    }
-  }
-  return(0);
-}
-
 /* caller is responsible for freeing returned string */
 char *owl_perlconfig_execute(char *line)