Raymond Toy pushed to branch issue-171-readable-unspecific-pathnames at cmucl / cmucl

Commits:

• 059a00b2
  by Raymond Toy at 2023-07-21T11:58:36-07:00

  Undo some indentation to keep diff smaller
  
  We'll leave the indentation unchanged, even though it is wrong; it's
  not relevant to this change.
  

1 changed file:

• src/code/pathname.lisp

Changes:

 		 (t

 		  (funcall (formatter "#<Unprintable pathname,~:_ Host=~S,~:_ Device=~S,~:_ ~

 				Directory=~S,~:_ Name=~S,~:_ Type=~S,~:_ Version=~S>")

-			   stream

-			   (%pathname-host pathname)

-			   (%pathname-device pathname)

-			   (%pathname-directory pathname)

-			   (%pathname-name pathname)

-			   (%pathname-type pathname)

-			   (%pathname-version pathname)))))))))

+			     stream

+			     (%pathname-host pathname)

+			     (%pathname-device pathname)

+			     (%pathname-directory pathname)

+			     (%pathname-name pathname)

+			     (%pathname-type pathname)

+			     (%pathname-version pathname)))))))))

 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

 ;;;