kim@kannel.lut.fi (Kimmo Suominen) (02/28/90)
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 )
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''