home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 6 / FreshFish_September1994.bin / bbs / gnu / emacs-18.59-src.lha / GNU / src / amiga / emacs-18.59 / lisp / rmailmsc.elc < prev    next >
Emacs Compiled Lisp  |  1991-01-10  |  728 b 

view JSON data     |     view as text     |     open on a Mac     |     open on a PC

This file was processed as: Emacs Compiled Lisp (other/emacsCompiledLisp).
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
1% dexvert Emacs Compiled Lisp (other/emacsCompiledLisp) magic Unsupported
100% file Emacs v18 byte-compiled Lisp data default
99% file data default
100% gt2 Kopftext: '(defun set-rmail-inbox-list (file-name) ' default (weak)
100% detectItEasy Format: plain text[LF] default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0a 28 64 65 66 75 6e 20 | 73 65 74 2d 72 6d 61 69 |.(defun |set-rmai|
|00000010| 6c 2d 69 6e 62 6f 78 2d | 6c 69 73 74 20 28 66 69 |l-inbox-|list (fi|
|00000020| 6c 65 2d 6e 61 6d 65 29 | 20 22 5c 0a 53 65 74 20 |le-name)| "\.Set |
|00000030| 74 68 65 20 69 6e 62 6f | 78 20 6c 69 73 74 20 6f |the inbo|x list o|
|00000040| 66 20 74 68 65 20 63 75 | 72 72 65 6e 74 20 52 4d |f the cu|rrent RM|
|00000050| 41 49 4c 20 66 69 6c 65 | 20 74 6f 20 46 49 4c 45 |AIL file| to FILE|
|00000060| 2d 4e 41 4d 45 2e 20 20 | 54 68 69 73 20 6d 61 79 |-NAME. |This may|
|00000070| 20 62 65 0a 61 20 6c 69 | 73 74 20 6f 66 20 66 69 | be.a li|st of fi|
|00000080| 6c 65 20 6e 61 6d 65 73 | 20 73 65 70 61 72 61 74 |le names| separat|
|00000090| 65 64 20 62 79 20 63 6f | 6d 6d 61 73 2e 20 20 49 |ed by co|mmas. I|
|000000a0| 66 20 46 49 4c 45 2d 4e | 41 4d 45 20 69 73 20 65 |f FILE-N|AME is e|
|000000b0| 6d 70 74 79 2c 20 72 65 | 6d 6f 76 65 0a 61 6e 79 |mpty, re|move.any|
|000000c0| 20 69 6e 62 6f 78 20 6c | 69 73 74 2e 22 20 28 69 | inbox l|ist." (i|
|000000d0| 6e 74 65 72 61 63 74 69 | 76 65 20 22 73 53 65 74 |nteracti|ve "sSet|
|000000e0| 20 6d 61 69 6c 62 6f 78 | 20 6c 69 73 74 20 74 6f | mailbox| list to|
|000000f0| 20 28 63 6f 6d 6d 61 2d | 73 65 70 61 72 61 74 65 | (comma-|separate|
|00000100| 64 20 6c 69 73 74 20 6f | 66 20 66 69 6c 65 6e 61 |d list o|f filena|
|00000110| 6d 65 73 29 3a 20 22 29 | 20 28 62 79 74 65 2d 63 |mes): ")| (byte-c|
|00000120| 6f 64 65 20 22 c2 88 8a | c8 20 c2 19 18 08 3f 86 |ode "...|. ....?.|
|00000130| 17 00 c9 ca cb cc 08 cd | 23 ce 51 21 83 58 00 c2 |........|#.Q!.X..|
|00000140| 1b cf 20 88 65 62 88 d0 | d1 21 88 d2 d3 c2 c4 23 |.. .eb..|.!.....#|
|00000150| 88 d4 d5 21 88 d6 d7 21 | 83 41 00 d8 60 d4 d9 21 |...!...!|.A..`..!|
|00000160| 88 60 5c 22 82 42 00 c2 | 88 da 0d db 5c 22 3f 83 |.`\".B..|....\"?.|
|00000170| 53 00 dc dd 0d de 23 82 | 54 00 c2 29 82 59 00 c2 |S.....#.|T..).Y..|
|00000180| 2a 29 88 c8 20 89 16 06 | 88 df 0e 07 21 87 22 20 |*).. ...|....!." |
|00000190| 5b 6e 61 6d 65 73 20 73 | 74 61 6e 64 61 72 64 2d |[names s|tandard-|
|000001a0| 6f 75 74 70 75 74 20 6e | 69 6c 20 62 75 66 66 65 |output n|il buffe|
|000001b0| 72 2d 72 65 61 64 2d 6f | 6e 6c 79 20 74 20 66 69 |r-read-o|nly t fi|
|000001c0| 6c 65 2d 6e 61 6d 65 20 | 72 6d 61 69 6c 2d 69 6e |le-name |rmail-in|
|000001d0| 62 6f 78 2d 6c 69 73 74 | 20 72 6d 61 69 6c 2d 63 |box-list| rmail-c|
|000001e0| 75 72 72 65 6e 74 2d 6d | 65 73 73 61 67 65 20 72 |urrent-m|essage r|
|000001f0| 6d 61 69 6c 2d 70 61 72 | 73 65 2d 66 69 6c 65 2d |mail-par|se-file-|
|00000200| 69 6e 62 6f 78 65 73 20 | 79 2d 6f 72 2d 6e 2d 70 |inboxes |y-or-n-p|
|00000210| 20 22 52 65 70 6c 61 63 | 65 20 22 20 6d 61 70 63 | "Replac|e " mapc|
|00000220| 6f 6e 63 61 74 20 69 64 | 65 6e 74 69 74 79 20 22 |oncat id|entity "|
|00000230| 2c 20 22 20 22 3f 20 22 | 20 77 69 64 65 6e 20 73 |, " "? "| widen s|
|00000240| 65 61 72 63 68 2d 66 6f | 72 77 61 72 64 20 22 0a |earch-fo|rward ".|
|00000250| 1f 22 20 72 65 2d 73 65 | 61 72 63 68 2d 62 61 63 |." re-se|arch-bac|
|00000260| 6b 77 61 72 64 20 22 5e | 4d 61 69 6c 22 20 66 6f |kward "^|Mail" fo|
|00000270| 72 77 61 72 64 2d 6c 69 | 6e 65 20 30 20 6c 6f 6f |rward-li|ne 0 loo|
|00000280| 6b 69 6e 67 2d 61 74 20 | 22 4d 61 69 6c 3a 22 20 |king-at |"Mail:" |
|00000290| 64 65 6c 65 74 65 2d 72 | 65 67 69 6f 6e 20 31 20 |delete-r|egion 1 |
|000002a0| 73 74 72 69 6e 67 3d 20 | 22 22 20 69 6e 73 65 72 |string= |"" inser|
|000002b0| 74 20 22 4d 61 69 6c 3a | 20 22 20 22 0a 22 20 72 |t "Mail:| " "." r|
|000002c0| 6d 61 69 6c 2d 73 68 6f | 77 2d 6d 65 73 73 61 67 |mail-sho|w-messag|
|000002d0| 65 5d 20 31 35 29 29 0a | |e] 15)).| |
+--------+-------------------------+-------------------------+--------+--------+