Wapp

Diff
Login

Differences From Artifact [72d0d081e3]:

To Artifact [98f23b2160]:


757
758
759
760
761
762
763


764

765
766
767
768
769
770
771
757
758
759
760
761
762
763
764
765

766
767
768
769
770
771
772
773







+
+
-
+







  }
  if {[dict exists $wapp .reply-extra]} {
    foreach {name value} [dict get $wapp .reply-extra] {
      puts $chan "$name: $value\r"
    }
  }
  if {[dict exists $wapp .csp]} {
    set csp [dict get $wapp .csp]
    regsub {\n} [string trim $csp] { } csp
    puts $chan "Content-Security-Policy: [dict get $wapp .csp]\r"
    puts $chan "Content-Security-Policy: $csp\r"
  }
  set mimetype [dict get $wapp .mimetype]
  puts $chan "Content-Type: $mimetype\r"
  if {[dict exists $wapp .new-cookies]} {
    foreach {nm val} [dict get $wapp .new-cookies] {
      if {[regexp {^[a-z][-a-z0-9_]*$} $nm]} {
        if {$val==""} {