Mercurial > emacs
annotate install-sh @ 66703:6cfb275aa300
Use split-string OMIT-NULLS argument.
(rcirc-print): Force redisplay before running hooks. Do long
buffer truncation after making new text read-only. Deal with nil
text when decoding strings. If TARGET is nil, use either the
currently selected buffer, if it is an rcirc buffer and of the
same process or the process buffer.
(rcirc-mode): Remove header-line. Recompute short buffer names.
Initialize rcirc-buffer-alist here instead of rcirc-get-buffer-create.
(rcirc-short-buffer-name): Add variable.
(rcirc-kill-buffer-hook): Recompute short buffer names. Remove
nick from private channel.
(rcirc-send-input): Send command text to current-buffer. Don't
clear overlay arrow here.
(rcirc-short-buffer-name): Return a short buffer name.
(rcirc-update-short-buffer-names, rcirc-abbreviate)
(rcirc-rebuild-tree, rcirc-make-trees): Add functions to generate
buffer-name abbreviations.
(rcirc-kill-buffer-hook-1): Split to make debugging easier. Do
not touch nick-table when killing a parted channel.
(rcirc-window-configuration-change): Rename from
rcirc-update-activity. Clear arrow from current buffer if it is now hidden.
(rcirc-current-buffer): Add variable.
(rcirc-my-nick, rcirc-other-nick, rcirc-server)
(rcirc-nick-in-message, rcirc-prompt, rcirc-mode-line-nick):
Remove -face from names.
(rcirc-update-activity-string): Print "DND" when globally ignoring activity.
(rcirc-ignore-buffer-activity-flag): Rename from rcirc-ignore-channel-activity.
(rcirc-ignore-all-activity-flag): Doc fix.
(rcirc-channels): Remove variable.
(rcirc-kill-buffer-hook):
(rcirc-get-buffer-create): Add nick to private channel.
(rcirc-multiline-edit-submit): Remove tabs.
(rcirc-put-nick-channel, rcirc-channel-nicks): Look up nicks case folded.
(rcirc-remove-nick-channel): Bug fix.
(rcirc-toggle-ignore-buffer-activity): Rename from
rcirc-toggle-ignore-channel-activity.
(rcirc-record-activity): Add buffers to the front of the list.
(rcirc-update-activity): Remove killed buffers from list.
(rcirc-process-server-response-1): Remove last argument if it is
null before calling handler.
(rcirc): Add "rcirc" defcustom prefix.
(rcirc-prompt): Simplify default prompt. Use custom-initialize-default.
(rcirc-private-chats): Remove variable.
(rcirc-prompt): Change initialization.
(rcirc-version): Remove function.
(rcirc-id-string): Add constant.
(rcirc-last-buffer): Remove variable.
(rcirc-buffer-alist): Add variable.
(rcirc-connect): Update variable setup.
(rcirc-sentinel, rcirc-update-prompt): Use `rcirc-buffer-alist'.
(rcirc-trap-errors-flag): Rename from `rcirc-trap-errors' change default.
(rcirc-handler-generic): Trigger activity.
(rcirc-send-message): Create the buffor of the target.
(rcirc-generate-new-buffer-name): Rename from
`rcirc-get-buffer-name'.
(rcirc-get-buffer): Just return nil if there is no matching buffer.
(rcirc-multiline-edit-cancel): Remove function.
(rcirc-set-last-buffer): Remove function.
(rcirc-get-any-buffer): Add function.
(rcirc-join-channels): Don't print /join text.
(rcirc-toggle-ignore-channel-activity): Add and update echo area messages.
(rcirc-cmd-ctcp): Use rcirc-send-string to send request.
(rcirc-handler-NOTICE): Recognize CTCP responses.
(rcirc-handler-332, rcirc-handler-332): Use a temp buffer for
constructing TOPIC string for buffers we are not JOINed.
(rcirc-handler-CTCP-response): Add handler.
(rcirc-multiline-edit-submit): Restore the window-configuration
before adjusting point.
(rcirc): Add customization group.
(rcirc-server, rcirc-port, rcirc-nick, rcirc-user-name)
(rcirc-user-full-name, rcirc-startup-channels-alist)
(rcirc-fill-flag, rcirc-fill-column, rcirc-fill-prefix)
(rcirc-ignore-all-activity-flag, rcirc-time-format)
(rcirc-input-ring-size, rcirc-read-only-flag)
(rcirc-buffer-maximum-lines, rcirc-authinfo-file-name)
(rcirc-auto-authenticate-flag, rcirc-prompt, rcirc-print-hooks):
Change defvar to defcustom.
(rcirc-update-prompt): Add optional ALL arg, which will update
prompts in all rcirc buffers. Regexp quote replacement text.
(rcirc-fill-column): Accept 'frame-width as a value.
(rcirc-set-changed): Add function.
(rcirc-next-active-buffer): Write more meaningful messages.
(rcirc-faces): Add customization group.
(rcirc-my-nick-face, rcirc-other-nick-face, rcirc-server-face)
(rcirc-nick-in-message-face, rcirc-prompt-face)
(rcirc-mode-line-nick-face): Move into rcirc-faces group.
(with-rcirc-process-buffer): Move before first usage.
(rcirc-debug-buffer): Rename from `rcirc-log-buffer'.
(rcirc-debug-flag): Rename from `rcirc-log-p'.
(rcirc-debug): Rename from `rcirc-log'.
(rcirc-format-response-string): Do not print '-' chars for a
NOTICE with no sender. Simplify output of server responses.
(rcirc-browse-url-map, rcirc-browse-url-at-point)
(rcirc-browse-url-at-mouse, rcirc-mangle-text): Make urls
mouse and RET clickable.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Fri, 04 Nov 2005 15:05:11 +0000 |
parents | 23a1cea22d13 |
children |
rev | line source |
---|---|
25978 | 1 #! /bin/sh |
2 # | |
3 # install - install a program, script, or datafile | |
4 # This comes from X11R5 (mit/util/scripts/install.sh). | |
5 # | |
6 # Copyright 1991 by the Massachusetts Institute of Technology | |
7 # | |
8 # Permission to use, copy, modify, distribute, and sell this software and its | |
9 # documentation for any purpose is hereby granted without fee, provided that | |
10 # the above copyright notice appear in all copies and that both that | |
11 # copyright notice and this permission notice appear in supporting | |
12 # documentation, and that the name of M.I.T. not be used in advertising or | |
13 # publicity pertaining to distribution of the software without specific, | |
14 # written prior permission. M.I.T. makes no representations about the | |
15 # suitability of this software for any purpose. It is provided "as is" | |
16 # without express or implied warranty. | |
17 # | |
18 # Calling this script install-sh is preferred over install.sh, to prevent | |
19 # `make' implicit rules from creating a file called install from it | |
20 # when there is no Makefile. | |
21 # | |
22 # This script is compatible with the BSD install script, but was written | |
23 # from scratch. It can only install one file at a time, a restriction | |
24 # shared with many OS's install programs. | |
25 | |
26 | |
27 # set DOITPROG to echo to test this script | |
28 | |
29 # Don't use :- since 4.3BSD and earlier shells don't like it. | |
30 doit="${DOITPROG-}" | |
31 | |
32 | |
33 # put in absolute paths if you don't have them in your path; or use env. vars. | |
34 | |
35 mvprog="${MVPROG-mv}" | |
36 cpprog="${CPPROG-cp}" | |
37 chmodprog="${CHMODPROG-chmod}" | |
38 chownprog="${CHOWNPROG-chown}" | |
39 chgrpprog="${CHGRPPROG-chgrp}" | |
40 stripprog="${STRIPPROG-strip}" | |
41 rmprog="${RMPROG-rm}" | |
42 mkdirprog="${MKDIRPROG-mkdir}" | |
43 | |
44 transformbasename="" | |
45 transform_arg="" | |
46 instcmd="$mvprog" | |
47 chmodcmd="$chmodprog 0755" | |
48 chowncmd="" | |
49 chgrpcmd="" | |
50 stripcmd="" | |
51 rmcmd="$rmprog -f" | |
52 mvcmd="$mvprog" | |
53 src="" | |
54 dst="" | |
55 dir_arg="" | |
56 | |
57 while [ x"$1" != x ]; do | |
58 case $1 in | |
59 -c) instcmd="$cpprog" | |
60 shift | |
61 continue;; | |
62 | |
63 -d) dir_arg=true | |
64 shift | |
65 continue;; | |
66 | |
67 -m) chmodcmd="$chmodprog $2" | |
68 shift | |
69 shift | |
70 continue;; | |
71 | |
72 -o) chowncmd="$chownprog $2" | |
73 shift | |
74 shift | |
75 continue;; | |
76 | |
77 -g) chgrpcmd="$chgrpprog $2" | |
78 shift | |
79 shift | |
80 continue;; | |
81 | |
82 -s) stripcmd="$stripprog" | |
83 shift | |
84 continue;; | |
85 | |
86 -t=*) transformarg=`echo $1 | sed 's/-t=//'` | |
87 shift | |
88 continue;; | |
89 | |
90 -b=*) transformbasename=`echo $1 | sed 's/-b=//'` | |
91 shift | |
92 continue;; | |
93 | |
94 *) if [ x"$src" = x ] | |
95 then | |
96 src=$1 | |
97 else | |
98 # this colon is to work around a 386BSD /bin/sh bug | |
99 : | |
100 dst=$1 | |
101 fi | |
102 shift | |
103 continue;; | |
104 esac | |
105 done | |
106 | |
107 if [ x"$src" = x ] | |
108 then | |
109 echo "install: no input file specified" | |
110 exit 1 | |
111 else | |
112 true | |
113 fi | |
114 | |
115 if [ x"$dir_arg" != x ]; then | |
116 dst=$src | |
117 src="" | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25978
diff
changeset
|
118 |
25978 | 119 if [ -d $dst ]; then |
120 instcmd=: | |
121 else | |
122 instcmd=mkdir | |
123 fi | |
124 else | |
125 | |
126 # Waiting for this to be detected by the "$instcmd $src $dsttmp" command | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25978
diff
changeset
|
127 # might cause directories to be created, which would be especially bad |
25978 | 128 # if $src (and thus $dsttmp) contains '*'. |
129 | |
130 if [ -f $src -o -d $src ] | |
131 then | |
132 true | |
133 else | |
134 echo "install: $src does not exist" | |
135 exit 1 | |
136 fi | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25978
diff
changeset
|
137 |
25978 | 138 if [ x"$dst" = x ] |
139 then | |
140 echo "install: no destination specified" | |
141 exit 1 | |
142 else | |
143 true | |
144 fi | |
145 | |
146 # If destination is a directory, append the input filename; if your system | |
147 # does not like double slashes in filenames, you may need to add some logic | |
148 | |
149 if [ -d $dst ] | |
150 then | |
151 dst="$dst"/`basename $src` | |
152 else | |
153 true | |
154 fi | |
155 fi | |
156 | |
157 ## this sed command emulates the dirname command | |
158 dstdir=`echo $dst | sed -e 's,[^/]*$,,;s,/$,,;s,^$,.,'` | |
159 | |
160 # Make sure that the destination directory exists. | |
161 # this part is taken from Noah Friedman's mkinstalldirs script | |
162 | |
163 # Skip lots of stat calls in the usual case. | |
164 if [ ! -d "$dstdir" ]; then | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25978
diff
changeset
|
165 defaultIFS=' |
25978 | 166 ' |
167 IFS="${IFS-${defaultIFS}}" | |
168 | |
169 oIFS="${IFS}" | |
170 # Some sh's can't handle IFS=/ for some reason. | |
171 IFS='%' | |
172 set - `echo ${dstdir} | sed -e 's@/@%@g' -e 's@^%@/@'` | |
173 IFS="${oIFS}" | |
174 | |
175 pathcomp='' | |
176 | |
177 while [ $# -ne 0 ] ; do | |
178 pathcomp="${pathcomp}${1}" | |
179 shift | |
180 | |
181 if [ ! -d "${pathcomp}" ] ; | |
182 then | |
183 $mkdirprog "${pathcomp}" | |
184 else | |
185 true | |
186 fi | |
187 | |
188 pathcomp="${pathcomp}/" | |
189 done | |
190 fi | |
191 | |
192 if [ x"$dir_arg" != x ] | |
193 then | |
194 $doit $instcmd $dst && | |
195 | |
196 if [ x"$chowncmd" != x ]; then $doit $chowncmd $dst; else true ; fi && | |
197 if [ x"$chgrpcmd" != x ]; then $doit $chgrpcmd $dst; else true ; fi && | |
198 if [ x"$stripcmd" != x ]; then $doit $stripcmd $dst; else true ; fi && | |
199 if [ x"$chmodcmd" != x ]; then $doit $chmodcmd $dst; else true ; fi | |
200 else | |
201 | |
202 # If we're going to rename the final executable, determine the name now. | |
203 | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25978
diff
changeset
|
204 if [ x"$transformarg" = x ] |
25978 | 205 then |
206 dstfile=`basename $dst` | |
207 else | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25978
diff
changeset
|
208 dstfile=`basename $dst $transformbasename | |
25978 | 209 sed $transformarg`$transformbasename |
210 fi | |
211 | |
212 # don't allow the sed command to completely eliminate the filename | |
213 | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25978
diff
changeset
|
214 if [ x"$dstfile" = x ] |
25978 | 215 then |
216 dstfile=`basename $dst` | |
217 else | |
218 true | |
219 fi | |
220 | |
221 # Make a temp file name in the proper directory. | |
222 | |
223 dsttmp=$dstdir/#inst.$$# | |
224 | |
225 # Move or copy the file name to the temp name | |
226 | |
227 $doit $instcmd $src $dsttmp && | |
228 | |
229 trap "rm -f ${dsttmp}" 0 && | |
230 | |
231 # and set any options; do chmod last to preserve setuid bits | |
232 | |
233 # If any of these fail, we abort the whole thing. If we want to | |
234 # ignore errors from any of these, just make sure not to ignore | |
235 # errors from the above "$doit $instcmd $src $dsttmp" command. | |
236 | |
237 if [ x"$chowncmd" != x ]; then $doit $chowncmd $dsttmp; else true;fi && | |
238 if [ x"$chgrpcmd" != x ]; then $doit $chgrpcmd $dsttmp; else true;fi && | |
239 if [ x"$stripcmd" != x ]; then $doit $stripcmd $dsttmp; else true;fi && | |
240 if [ x"$chmodcmd" != x ]; then $doit $chmodcmd $dsttmp; else true;fi && | |
241 | |
242 # Now rename the file to the real destination. | |
243 | |
244 $doit $rmcmd -f $dstdir/$dstfile && | |
49600
23a1cea22d13
Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents:
25978
diff
changeset
|
245 $doit $mvcmd $dsttmp $dstdir/$dstfile |
25978 | 246 |
247 fi && | |
248 | |
249 | |
250 exit 0 |