anchor.diff:                  (format stream " &g(afk: ~a)&y" (afk-reason-of i))
                   (format stream " &g(afk)&y"))))
   
  -        (format stream "~%")
  +        (format stream "&n~%")
   
           (unless (pref-flagged ch +pref-notrailers+)
             (desc-char-trailers stream ch i))))))
  
positive.code: 
    ;; autoexits
    (when (pref-flagged ch +pref-autoexit+)
        (do-auto-exits ch room))
    (send-to-char ch "~%")
  
    ;; now list characters & objects
    (show-blood-and-ice ch room)
    (send-to-char ch "&g~a&n"
                  (with-output-to-string (s)
                    (list-obj-to-char s (contents-of room) ch :room nil)))
    (send-to-char ch "&y~a&n"
                  (with-output-to-string (s)
                    (list-char-to-char s (people-of room) ch))))
  
  
negative.code: 
    (send-to-char ch
                  (case (pk-style-of (zone-of room))
                    (0 "&c[ &g!PK &c] ")
                    (1 "&c[ &YNPK &c] ")
                    (2 "&c[ &RCPK &c] ")))
  
    (unless (or (immortalp ch)
                (not (room-flagged room +room-smoke-filled+))
  