Differences From Artifact [48947370a7]:
- File attic/dashboard-context-menu.scm — part of check-in [101ee7c52b] at 2021-03-06 04:39:46 on branch v1.65-real-chicken-5 — Try a grounds-up switch to chicken-5 (user: matt, size: 14017) [annotate] [blame] [check-ins using]
- File dashboard-context-menu.scm — part of check-in [0f33ea4295] at 2020-08-24 00:23:16 on branch v1.65-cleanup — Added more granular exception handling ==/9.4/0.9/WARN/2102/mars/== ==/5.7/1.2/WARN/1201/mars/== (user: mrwellan, size: 14017) [annotate] [blame] [check-ins using]
To Artifact [83fc3e6c83]:
- File dashboard-context-menu.scm — part of check-in [429f76ae7e] at 2022-11-05 21:04:09 on branch v1.70 — Removed or updated prints to get bare-prints passing in ext-tests. (user: matt, size: 14044) [annotate] [blame] [check-ins using]
| ︙ | ︙ | |||
317 318 319 320 321 322 323 |
(runs:get-mt-env-alist run-id run-name target test-name item-path)
(lambda ()
(if scheme-match
(begin
(handle-exceptions
exn
| | | 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 |
(runs:get-mt-env-alist run-id run-name target test-name item-path)
(lambda ()
(if scheme-match
(begin
(handle-exceptions
exn
(debug:print 0 *default-log-port* "error with custom menu scheme, exn=" exn)
(begin
;;(BB> "gonna eval it!")
(eval (with-input-from-string (cadr scheme-match) read)))))
(common:run-a-command command-line with-vars: #t))))))))
#f)))
vars)))
|
| ︙ | ︙ |