inst/App/leftPanel/mid/UIcontextMenu.R

In mslegrand/pointR: pointR

UIcontextMenu<-function(){
  div( id ='cntnr', # ace context menu
       if(usingElectron){# usingElectron
         tagList(
           tag('ul',  list(
             id='items',
             tag('li',list(class='clickMe', span(class='icon-clone'),span('Copy')  )),
             tag('li',list(class='clickMe', span(class='icon-scissors'),span('Cut')  )),
             tag('li',list(class='clickMe', span(class='icon-paste'),span('Paste')  )),
             tag('li',list(class='clickMe', span(class='icon-cancel'),span('Delete')  ))#,
           )),
           hr(class='contexthr')
         )
       } else {
         NULL
       },
       tag('ul', list(
         id='items',
         tag('li',list(class='clickMe', span(class="icon-help"), span( 'Lookup element'))),
         tag('li',list(id='rmd-insert-svgR', class='clickMe', span(class=" icon-circle-empty"), span( 'Insert svgR Block'))),
         tag('li',list(id='rmd-insert-ptR', class='clickMe', span(class="icon-circle"), span( 'Insert ptR Block'))),
         tag('li',list(id='rmd-edit-code', class='clickMe', span(class='icon-edit'),span('Edit Code Block')  )),
         tag('li',list(id='dnd-insert-block', class='clickMe', span(class=" icon-plus-squared-alt"), span( 'Insert DNDS Block'))),
         tag('li',list(id='dnd-edit-svgR', class='clickMe', span(class="icon-edit"), span( 'Edit DNDS Icon')))
       ))
  )
}