digraph {

  label = "Seppo.app: Whom have I subscribed to";
  labelloc = t;
  //rankdir = LR;

  start [shape=point];
  node  [shape=doublecircle]; accepted rejected [label="rejected\n(or am\nblocked)"];
  node  [shape=circle];

  start -> pending -> rejected -> pending -> accepted;
}
