Skip to content

Commit

Permalink
convenience function to open a search dialog for objects
Browse files Browse the repository at this point in the history
Related: #84

the basic idea is:
- make failed objects clickable in the Pd-console (and or openable via right-click)
- this would then open the deken panel prefilled and you only have to hit "search"
  • Loading branch information
umlaeute committed Feb 26, 2021
1 parent b7d1490 commit 7eaa7d3
Showing 1 changed file with 18 additions and 0 deletions.
18 changes: 18 additions & 0 deletions deken-plugin.tcl
Original file line number Diff line number Diff line change
Expand Up @@ -970,6 +970,24 @@ proc ::deken::install_package_from_file {{pkgfile ""}} {
::deken::install_package ${pkgfile} "" "" 1
}

proc ::deken::open_search_objects {args} {
set winid .externals_searchui
::deken::open_searchui $winid
::deken::clearpost

if { $::deken::searchtype ne "objects" } {
${winid}.searchbit.entry delete 0 end
}
if { [$winid.searchbit.entry get] ne {} } {
${winid}.searchbit.entry insert end " "
}

${winid}.searchbit.entry insert end $args

set ::deken::searchtype objects
::deken::update_searchbutton $winid
}

proc ::deken::preferences::create_pathpad {toplevel row {padx 2} {pady 2}} {
set pad [::deken::utilities::newwidget ${toplevel}.pad]
frame $pad -relief groove -borderwidth 2 -width 2 -height 2
Expand Down

0 comments on commit 7eaa7d3

Please sign in to comment.