anchor.diff:          (cond
             ((and (is-npc i)
                   (= (position-of i) (default-pos-of (shared-of i))))
  -           (if (long-descr-of i)
  -               (format stream "~a" (long-descr-of i))
  -               (format stream "~a exists here." name)))
  +           (if (string= (long-descr-of i) "")
  +               (format stream "~a exists here." name)
  +               (format stream "~a" (long-descr-of i))))
             ((= (position-of i) +pos-fighting+)
              (cond
                ((null (fighting-of i))
  
positive.code:                      " is lying here, stunned."
                       " is sleeping here."
                       " is resting here."
                       "!FIGHTING!"
                       " is standing here."
                       " is hovering here."
  
negative.code:         (when (and (is-npc i)
                     (or (immortalp ch) (testerp ch))
                     (pref-flagged ch +pref-disp-vnums+))
            (format stream " &g<&n~d&g>" (vnum-of (shared-of i))))
  
          (unless (is-npc i)
            (unless (link-of i)
              (format stream " &m(linkless)&y"))
            (when (plr-flagged i +plr-writing+)
              (format stream " &g(writing)&y"))
  