Fossil Wrapper

Check-in [4038632842]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Simplify the prompt regexp (no need to escape '?' inside a disjunction).
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 403863284239ce2f9f304f3b21dd42b70a53975d
User & Date: marc 2013-01-08 14:06:44
Context
2013-01-17
05:08
Colour MISSING in default status filter. check-in: 2e30171ad3 user: marc tags: trunk
2013-01-08
14:06
Simplify the prompt regexp (no need to escape '?' inside a disjunction). check-in: 4038632842 user: marc tags: trunk
2012-12-29
13:37
Reference the caller's namespace when defining interceptors (close [caeb6df696]). check-in: 6839e8de1e user: marc tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to fsl.

317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
        if {[interactive? $command]} {
            interact; break
        }
        expect {
            eof { break }
            \n  { filter_with $chain $expect_out(buffer) }
            # Transfer control to user following prompt:
            -re {[\?:] $} {
                if {![log_user]} {
                    send_user $expect_out(buffer)
                }
                interact -o \n { send_user \r\n }
                break
            }
        }







|







317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
        if {[interactive? $command]} {
            interact; break
        }
        expect {
            eof { break }
            \n  { filter_with $chain $expect_out(buffer) }
            # Transfer control to user following prompt:
            -re {[?:] $} {
                if {![log_user]} {
                    send_user $expect_out(buffer)
                }
                interact -o \n { send_user \r\n }
                break
            }
        }