Forums Scripts & Popups dialog $input problem

on *:DIALOG:lister:sclick:*: {
  var %D = $Did

  if (%D == 5) {
    var %Confirm = $Input(Are you sure you would like to remove it, y, Removal)

    if (%Confirm) {
      echo -a yes

    }
    else echo -a no confirm
  }
}

dialog lister {
  title "Test"
  size -1 -1 100 100
  option dbu
  list 100, 5 5 90 70, multsel
  button "Click", 5, 25 80 50 10
}
on *:dialog:lister:init:0:{
  noop $findfile($mircdir,*.ini,0,did -a lister 100 $nopath($1-))
}
on *:DIALOG:lister:sclick:5: {
  var %Confirm = $Input(Are you sure you would like to remove it, y, Removal)
  if (%Confirm) {
    echo -a yes
  }
  else echo -a no confirm
}