branch: externals/idlwave
commit 82d65136f8dcc2b35482232a938c74a500618959
Author: JD Smith <jdtsm...@gmail.com>
Commit: JD Smith <jdtsm...@gmail.com>

    Handle IDL$LAMBDA procedures and functions
    These have no on disk code representation.
---
 idlw-shell.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/idlw-shell.el b/idlw-shell.el
index 0bd6d12def..af6a270712 100644
--- a/idlw-shell.el
+++ b/idlw-shell.el
@@ -2420,9 +2420,11 @@ matter what the settings of that variable."
        (if idlwave-shell-electric-debug-buffers
            (idlwave-shell-electric-debug-all-off)))
     (if (not (idlwave-shell-valid-frame frame))
-       ;; fixme: errors are dangerous in shell filters.  but i think i
-       ;; have never encountered this one.
-        (error "invalid frame - unable to access file: %s" (car frame))
+       ;; fixme: errors are dangerous in shell filters.  IDL LAMBDA
+       ;; functions are not stored as code, so just silently ignore
+       ;; these errors.
+       (unless (string-match-p "^IDL\$LAMBDA" (caddr frame))
+         (error "invalid frame - unable to access file: %s" (car frame)))
       ;;
       ;; buffer : the buffer to display a line in.
       ;; select-shell: current buffer is the shell.

Reply via email to