🚀 go-pugleaf

I like using dired, but recently I ran into a difference between HP-UX and BSD
which wasn't noticed in dired.el.  The program chown is hard-coded in lisp as
/etc/chown, which is correct in BSD Unix (or at least SunOS).  In HP-UX (and
possibly other SysV's) the program is /bin/chown.

The following patch is for version 18.55 of GNU Emacs and it only takes hpux
in account.

*** lisp/dired.el~
--- lisp/dired.el
**************
*** 537,543
    (interactive "sChange to Owner: ")
    (let ((buffer-read-only nil)
  	(file (dired-get-filename)))
!     (call-process "/etc/chown" nil nil nil owner file)
      (dired-redisplay file)))
  
  (defun dired-redisplay (file) "Redisplay this line."
--- 537,545 -----
    (interactive "sChange to Owner: ")
    (let ((buffer-read-only nil)
  	(file (dired-get-filename)))
!     (if (eq system-type 'hpux)
! 	(call-process "/bin/chown" nil nil nil owner file)
!       (call-process "/etc/chown" nil nil nil owner file))
      (dired-redisplay file)))
  
  (defun dired-redisplay (file) "Redisplay this line."

Use and possibly incorporate into future releases.

Kim
--
 ,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,
( Kimmo Suominen        ! Lappeenranta U of Technology ! kim@kannel.lut.fi )
( "That's what I think" ! Computing Centre  *  Finland ! Funet: KUULA::KIM )
 ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''