Wapp

Check-in [f7b5b7566a]
Login

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

Overview
Comment:If a command named "wapp-crash-handler" exists and an application error occurs, invoke the wapp-crash-handler command to generate the error message.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: f7b5b7566af73909c9f6c1a2d4dfc027b98f12568c953fd50fab41915f5ea663
User & Date: drh 2024-11-06 17:09:14.298
Context
2024-11-06
17:44
Updates to the MacOS makefile. (check-in: 03f1783d7e user: drh tags: trunk)
17:09
If a command named "wapp-crash-handler" exists and an application error occurs, invoke the wapp-crash-handler command to generate the error message. (check-in: f7b5b7566a user: drh tags: trunk)
16:24
Show both the SQLite version number and the TCL version number with the -v option to wapptclsh. (check-in: 719ed9a20d user: drh tags: trunk)
Changes
Unified Diff Ignore Whitespace Patch
Changes to wapp.tcl.
︙︙
726
727
728
729
730
731
732


733
734
735
736
737

738
739
740
741
742
743
744

      wapp-default
    }
  } msg]} {
    if {[wapp-param WAPP_MODE]=="local" || [wapp-param WAPP_MODE]=="server"} {
      puts "ERROR: $::errorInfo"
    }
    wapp-reset


    wapp-reply-code "500 Internal Server Error"
    wapp-mimetype text/html
    wapp-trim {
      <h1>Wapp Application Error</h1>
      <pre>%html($::errorInfo)</pre>

    }
    dict unset wapp .new-cookies
  }
  wapp-before-reply-hook

  # Transmit the HTTP reply
  #








>
>
|
|
|
|
|
>








726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747

      wapp-default
    }
  } msg]} {
    if {[wapp-param WAPP_MODE]=="local" || [wapp-param WAPP_MODE]=="server"} {
      puts "ERROR: $::errorInfo"
    }
    wapp-reset
    if {[info command wapp-crash-handler]==""
        || [catch {wapp-crash-handler $::errorInfo}]} {
      wapp-reply-code "500 Internal Server Error"
      wapp-mimetype text/html
      wapp-trim {
        <h1>Wapp Application Error</h1>
        <pre>%html($::errorInfo)</pre>
      }
    }
    dict unset wapp .new-cookies
  }
  wapp-before-reply-hook

  # Transmit the HTTP reply
  #
︙︙