Ошибка: invalid command name "<bad-db>"

[thecsw]

Hello! I hope you are doing well.

I've been trying to run Drakon editor on a 2020 M1 MacBook and having some troubles going through it. I have used the x86_64 terminal and build Img package for Drakon for it to execute using wish and tcl version 8.6.13

When I got the editor version 1.31 from sourceforge linked on DrakonHub and ran it with everything above, whenever I try to create a diagram of any type or a folder, I'm greeted with this error message. Something about a <bad_db> command?

I verified that sqlite3 is also installed and the architectures match.

In my home directory, after I press the button to create a diagram, a new sqlite db is written,

~ λ file drakon_editor.settings
drakon_editor.settings: SQLite 3.x database, last written using SQLite version 3040000, file counter 2, database pages 4, cookie 0x2, schema 4, UTF-8, version-valid-for 2

By any chance anyone had an issue like this? I searched through this github and other forums, but seems to be a unique issue. If you have any advice, please let me know. Thanks!

[thecsw]

I must say—the same error happens when using drakon_editor.tcl of the current master branch

[techieshark]

Same here. When I view the error it seems the same:

invalid command name "<bad-db>"
invalid command name "<bad-db>"
    while executing
"$db eval $sql "
    (procedure "mod::exists" line 3)
    invoked from within
"mod::exists $db diagrams name '$name' "
    (procedure "check_diagram_name" line 13)
    invoked from within
"check_diagram_name $new "
    (procedure "mwc::do_create_dia" line 3)
    invoked from within
"$callback $name $sil $sibling $dialect "
    (procedure "mwd::ok" line 17)
    invoked from within
"mwd::ok"
    invoked from within
".create_d.root.lower.ok invoke "
    invoked from within
".create_d.root.lower.ok instate !disabled { .create_d.root.lower.ok invoke } "
    invoked from within
".create_d.root.lower.ok instate pressed { .create_d.root.lower.ok state !pressed; .create_d.root.lower.ok instate !disabled { .create_d.root.lower.ok ..."
    (command bound to event)

I'm using tcl-tk installed by brew. Running it (/opt/homebrew/Cellar/tcl-tk/8.6.13_2/bin/tclsh8.6), then allows me to check the sqlite3 version, in case that matters:

% sqlite3 -version
3.41.2 2023-03-22 11:56:21 0d1fc92f94cb6b76bffe3ec34d69cffde2924203304e8ffc4155597af0c191da

I see 'bad-db' twice in the code but I haven't had time to explore this further

https://github.com/search?q=repo%3Astepan-mitkin%2Fdrakon_editor+bad-db&type=code