Message indicating clone original

I would really like to have a revision log message or comment indicating which node was cloned to produce the new one. In hook_clone_node_alter() I tried

    $node->log = 'Cloned from '
      . l($context['original_node']->title, 'node/'. $context['original_node']->nid);

But that didn't work.