mirror of the now-defunct rocklinux.org
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

37 lines
1.5 KiB

  1. # --- ROCK-COPYRIGHT-NOTE-BEGIN ---
  2. #
  3. # This copyright note is auto-generated by ./scripts/Create-CopyPatch.
  4. # Please add additional copyright information _after_ the line containing
  5. # the ROCK-COPYRIGHT-NOTE-END tag. Otherwise it might get removed by
  6. # the ./scripts/Create-CopyPatch script. Do not edit this copyright text!
  7. #
  8. # ROCK Linux: rock-src/package/rene/mew/fix-cite-config-bug.patch
  9. # ROCK Linux is Copyright (C) 1998 - 2005 Clifford Wolf
  10. #
  11. # This patch file is dual-licensed. It is available under the license the
  12. # patched project is licensed under, as long as it is an OpenSource license
  13. # as defined at http://www.opensource.org/ (e.g. BSD, X11) or under the terms
  14. # of the GNU General Public License as published by the Free Software
  15. # Foundation; either version 2 of the License, or (at your option) any later
  16. # version.
  17. #
  18. # --- ROCK-COPYRIGHT-NOTE-END ---
  19. This fixes a logic bug to make the cite behaviour configurable.
  20. - Rene Rebe <rene@exactcode.de>
  21. --- mew-3.3/mew-draft.el 2003-06-19 05:58:13.000000000 +0000
  22. +++ mew-3.3-fixed/mew-draft.el 2003-09-11 17:49:10.000000000 +0000
  23. @@ -499,8 +499,8 @@
  24. (let ((mark-active t) (transient-mark-mode nil))
  25. (cond
  26. ;; arg will be effect in mew-cite-original
  27. - ((and (mew-mark) (or (not mew-cite-ignore-mouse-region)
  28. - (not (mew-mouse-region-p))))
  29. + ((and (mew-mark) (and (not mew-cite-ignore-mouse-region)
  30. + (not (mew-mouse-region-p))))
  31. (setq beg (region-beginning) end (region-end)))
  32. ((mew-header-p)
  33. ;; header exists in Message mode. Skip the header