--- loncom/metadata_database/parse_activity_log.pl	2004/12/22 19:25:42	1.10
+++ loncom/metadata_database/parse_activity_log.pl	2004/12/22 20:42:39	1.11
@@ -2,7 +2,7 @@
 #
 # The LearningOnline Network
 #
-# $Id: parse_activity_log.pl,v 1.10 2004/12/22 19:25:42 matthew Exp $
+# $Id: parse_activity_log.pl,v 1.11 2004/12/22 20:42:39 matthew Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -480,7 +480,7 @@ sub process_courselog {
                          'uname= '.$uname.$/.
                          'udom = '.$udom.$/.
                          'action='.$action.$/.
-                         '@values = '.join(':',@values));
+                         '@values = '.join('&',@values));
                 next; #skip it if we cannot understand what is happening.
             }
             if (! defined($student) || $student eq ':') {
@@ -524,7 +524,13 @@ sub process_courselog {
                 next; # skip this chunk
             }
             #
-            my $values = $dbh->quote(join(':',map { &escape($_); } @values));
+            my $store_values;
+            if ($action eq 'POST') {
+                $store_values = 
+                    $dbh->quote(join('&',map { &escape($_); } @values));
+            } else {
+                $store_values = $dbh->quote(join('&',@values));
+            }
             $time_this->('get_ids');
             #
             my $row = [$res_id,
@@ -534,7 +540,7 @@ sub process_courselog {
 #                       $action_id,
                        qq{''},        # idx
                        $machine_id,
-                       $values];
+                       $store_values];
             push(@RowData,$row);
             $time_this->('push_row');
             $prevchunk = $chunk;