Now set in intrinsic-shim

Author: yitzchak

src/lisp/kernel/lsp/format-pprint.lisp

@@ -468,8 +468,6 @@
   (error 'format-error
          :complaint "No corresponding open bracket."))
 
-(setf (first (cdr si::+io-syntax-progv-list+)) inravina-intrinsic:*standard-pprint-dispatch*)
-      
 (defmethod print-object ((obj structure-object) stream)
   (if *print-pretty*
       (inravina:pprint-structure-object inravina-intrinsic:*client* stream obj)