[Emacs-diffs] Changes to emacs/lisp/gnus/flow-fill.el

[Miles Bader]

Index: emacs/lisp/gnus/flow-fill.el
diff -c emacs/lisp/gnus/flow-fill.el:1.11 emacs/lisp/gnus/flow-fill.el:1.12
*** emacs/lisp/gnus/flow-fill.el:1.11   Sat Aug  6 19:51:41 2005
--- emacs/lisp/gnus/flow-fill.el        Mon Oct 31 07:07:27 2005
***************
*** 161,198 ****
    (defvar show-trailing-whitespace))
  
  (defvar fill-flowed-encode-tests
!   '(
      ;; The syntax of each list element is:
      ;; (INPUT . EXPECTED-OUTPUT)
!     ("> Thou villainous ill-breeding spongy dizzy-eyed
! > reeky elf-skinned pigeon-egg!
! >> Thou artless swag-bellied milk-livered
! >> dismal-dreaming idle-headed scut!
! >>> Thou errant folly-fallen spleeny reeling-ripe
! >>> unmuzzled ratsbane!
! >>>> Henceforth, the coding style is to be strictly
! >>>> enforced, including the use of only upper case.
! >>>>> I've noticed a lack of adherence to the coding
! >>>>> styles, of late.
! >>>>>> Any complaints?
! " . "> Thou villainous ill-breeding spongy dizzy-eyed reeky elf-skinned
! > pigeon-egg!
! >> Thou artless swag-bellied milk-livered dismal-dreaming idle-headed
! >> scut!
! >>> Thou errant folly-fallen spleeny reeling-ripe unmuzzled ratsbane!
! >>>> Henceforth, the coding style is to be strictly enforced,
! >>>> including the use of only upper case.
! >>>>> I've noticed a lack of adherence to the coding styles, of late.
! >>>>>> Any complaints?
! ")
! ;    ("
! ;> foo
! ;>
! ;>
! ;> bar
! ;" . "
! ;> foo bar
! ;")
      ))
  
  (defun fill-flowed-test ()
--- 161,203 ----
    (defvar show-trailing-whitespace))
  
  (defvar fill-flowed-encode-tests
!   `(
      ;; The syntax of each list element is:
      ;; (INPUT . EXPECTED-OUTPUT)
!     (,(concat
!        "> Thou villainous ill-breeding spongy dizzy-eyed \n"
!        "> reeky elf-skinned pigeon-egg! \n"
!        ">> Thou artless swag-bellied milk-livered \n"
!        ">> dismal-dreaming idle-headed scut!\n"
!        ">>> Thou errant folly-fallen spleeny reeling-ripe \n"
!        ">>> unmuzzled ratsbane!\n"
!        ">>>> Henceforth, the coding style is to be strictly \n"
!        ">>>> enforced, including the use of only upper case.\n"
!        ">>>>> I've noticed a lack of adherence to the coding \n"
!        ">>>>> styles, of late.\n"
!        ">>>>>> Any complaints?")
!      .
!      ,(concat
!        "> Thou villainous ill-breeding spongy dizzy-eyed reeky elf-skinned\n"
!        "> pigeon-egg! \n"
!        ">> Thou artless swag-bellied milk-livered dismal-dreaming 
idle-headed\n"
!        ">> scut!\n"
!        ">>> Thou errant folly-fallen spleeny reeling-ripe unmuzzled 
ratsbane!\n"
!        ">>>> Henceforth, the coding style is to be strictly enforced,\n"
!        ">>>> including the use of only upper case.\n"
!        ">>>>> I've noticed a lack of adherence to the coding styles, of 
late.\n"
!        ">>>>>> Any complaints?\n"
!        ))
!     ;; (,(concat
!     ;;    "\n"
!     ;;    "> foo\n"
!     ;;    "> \n"
!     ;;    "> \n"
!     ;;    "> bar\n")
!     ;;  .
!     ;;  ,(concat
!     ;;    "\n"
!     ;;    "> foo bar\n"))
      ))
  
  (defun fill-flowed-test ()