Skip to content

Commit

Permalink
Sequencer: Remove "Delete" popup menu entry. Too similar to "Delete c…
Browse files Browse the repository at this point in the history
…urrent". Fixes #1374
  • Loading branch information
kjetil_matheussen committed Jan 20, 2024
1 parent db57fe0 commit fc420ec
Showing 1 changed file with 8 additions and 8 deletions.
16 changes: 8 additions & 8 deletions bin/scheme/mouse.scm
Original file line number Diff line number Diff line change
Expand Up @@ -7083,14 +7083,14 @@
(<ra> :select-seqblock #t seqblocknum seqtracknum))
(<ra> :cut-selected-seqblocks)))

(list "Delete"
;;:enabled (> num-selected-with-current 0)
:enabled seqblock-info
:shortcut ra:simulate-delete-mouse-button
(lambda ()
(set! *current-seqblock-info* #f)
(<ra> :delete-seqblock seqblockid)
(set! *current-seqblock-info* #f)))
;;(list "Delete"
;; ;;:enabled (> num-selected-with-current 0)
;; :enabled seqblock-info
;; :shortcut ra:simulate-delete-mouse-button
;; (lambda ()
;; (set! *current-seqblock-info* #f)
;; (<ra> :delete-seqblock seqblockid)
;; (set! *current-seqblock-info* #f)))

(list "Delete all selected"
:enabled (> num-selected-with-current 1)
Expand Down

0 comments on commit fc420ec

Please sign in to comment.