| … | … | ||
|---|---|---|---|
| 371 | 371 | ||
| 372 | aio_rename "$runtime~", $runtime | 372 | aio_rename "$runtime~", $runtime |
| 373 | and return; | 373 | and return; |
| 374 | 374 | ||
| 375 | 1 | 375 | 1 |
| 376 | } | ||
| 377 | |||
| 378 | =item cf::datalog type => key => value, ... | ||
| 379 | |||
| 380 | Log a datalog packet of the given type with the given key-value pairs. | ||
| 381 | |||
| 382 | =cut | ||
| 383 | |||
| 384 | sub datalog($@) { | ||
| 385 | my ($type, %kv) = @_; | ||
| 386 | warn "DATALOG ", JSON::XS->new->ascii->encode ({ %kv, type => $type }); | ||
| 376 | } | 387 | } |
| 377 | 388 | ||
| 378 | =back | 389 | =back |
| 379 | 390 | ||
| 380 | =cut | 391 | =cut |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |