cvs commit: modperl-2.0/src/modules/perl modperl_global.c

[dougm]

dougm       01/04/30 19:01:03

  Modified:    src/modules/perl modperl_global.c
  Log:
  another fix for non-threaded Perls
  
  Revision  Changes    Path
  1.2       +2 -1      modperl-2.0/src/modules/perl/modperl_global.c
  
  Index: modperl_global.c
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_global.c,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -r1.1 -r1.2
  --- modperl_global.c  2001/04/30 04:35:08     1.1
  +++ modperl_global.c  2001/05/01 02:01:02     1.2
  @@ -153,7 +153,7 @@
   #if MP_THREADED
       return apr_threadkey_private_get(data, key);
   #else
  -    *data = modperl_global_get(key);
  +    *data = modperl_global_get((modperl_global_t *)key);
       return APR_SUCCESS;
   #endif
   }
  @@ -163,6 +163,7 @@
   #if MP_THREADED
       return apr_threadkey_private_set(data, key);
   #else
  +    modperl_global_set((modperl_global_t *)key, data);
       return APR_SUCCESS;
   #endif
   }