}
}
}
+ # LOCAL CHANGE FOR HKS 2024
+ # Piece together HKS users.
+ $q = $dbh->prepare('SELECT userid FROM current_reactions WHERE channel=? and ts=? and reaction=?;');
+ $q->execute('C06C34L2R6G', '1712686401.430939', 'heart'); # #hks-2024-05-04
+ my @hks_runners = ();
+ while (my $ref = $q->fetchrow_hashref) {
+ my $userid = $ref->{'userid'};
+ if (!exists($slack_userid_to_real_name{$userid}) && !exists($slack_userid_to_slack_name{$userid})) {
+ my $slack_name = get_slack_name($ua, $userid);
+ my $write_row = $cur_row++;
+ push @slack_mapping_updates, {
+ range => "Slack-mapping!A$write_row:A$write_row",
+ values => [ [ $userid ]]
+ };
+ push @slack_mapping_updates, {
+ range => "Slack-mapping!B$write_row:B$write_row",
+ values => [ [ $slack_name ]]
+ };
+ $slack_userid_to_slack_name{$userid} = $slack_name;
+ }
+ my $name = $slack_userid_to_real_name{$userid} // $slack_userid_to_slack_name{$userid} // $userid;
+ push @hks_runners, { values => [{ userEnteredValue => { stringValue => $name } }] };
+ }
+ push @hks_runners, { values => [{ userEnteredValue => { stringValue => '' } }] };
+ push @hks_runners, { values => [{ userEnteredValue => { stringValue => '' } }] };
+ push @hks_runners, { values => [{ userEnteredValue => { stringValue => '' } }] };
+ # END LOCAL CHANGE FOR HKS 2024
if (scalar @slack_mapping_updates > 0) {
my $update = {
valueInputOption => 'USER_ENTERED',
}
};
+ # LOCAL CHANGE FOR HKS 2024
+ push @yellow_updates, {
+ updateCells => {
+ rows => \@hks_runners,
+ fields => 'userEnteredValue.stringValue',
+ range => {
+ sheetId => $config::hks_tab_id,
+ startRowIndex => 1,
+ endRowIndex => 1 + scalar @hks_runners,
+ startColumnIndex => 0,
+ endColumnIndex => 1
+ }
+ }
+ };
+ # END LOCAL CHANGE FOR HKS 2024
+
# Push the final set of updates (including the log).
skv_log("Ferdig.");
push @yellow_updates, serialize_skv_log_to_sheet();