/macosx-10.9.5/ruby-104/ruby/ext/win32ole/sample/ |
H A D | oledirs.rb | 16 folder = fs.GetFolder(".") 18 puts "--- folder of #{folder.path} ---" 19 listup(folder.SubFolders) 21 puts "--- files of #{folder.path} ---" 22 listup(folder.Files)
|
/macosx-10.9.5/emacs-92/emacs/lisp/mh-e/ |
H A D | mh-inc.el | 58 (folder (nth 1 elem)) 61 (mh-inc-spool-generator folder spool) 62 (mh-inc-spool-def-key key folder)))))) 66 (defun mh-inc-spool-generator (folder spool) 68 (let ((folder1 (make-symbol "folder")) 70 (set folder1 folder) 72 (setf (symbol-function (intern (concat "mh-inc-spool-" folder))) 74 ,(format "Inc spool file %s into folder %s." spool folder) 76 (mh-inc-folder ,spool [all...] |
H A D | mh-utils.el | 77 "Check if colors are being used in the folder buffer." 175 `mh-draft-folder' from \"Draft-Folder:\", `mh-unseen-seq' from 204 (setq mh-draft-folder (mh-profile-component "Draft-Folder")) 205 (if mh-draft-folder 207 (if (not (mh-folder-name-p mh-draft-folder)) 208 (setq mh-draft-folder (format "+%s" mh-draft-folder))) 209 (if (not (file-exists-p (mh-expand-file-name mh-draft-folder))) 211 "Draft folder \" [all...] |
H A D | mh-tool-bar.el | 52 (defun mh-tool-bar-folder-help () 64 (defmacro mh-tool-bar-reply-generator (function recipient folder-buffer-flag) 72 ,(if folder-buffer-flag nil '(set-buffer mh-show-folder-buffer)) 97 Here :KEYWORD is one of :folder or :letter. If it is :folder then 98 the default buttons in the folder and show mode buffers are being 113 MODES is a list of symbols. List elements must be from \"folder\", 114 \"letter\" and \"sequence\". If \"folder\" is present then the button is 115 available in the folder an [all...] |
H A D | mh-speed.el | 44 (defvar mh-speed-last-selected-folder nil) 45 (defvar mh-speed-folder-map (make-hash-table :test #'equal)) 69 (defvar mh-folder-speedbar-menu-items 74 (get-text-property (mh-line-beginning-position) 'mh-folder))] 75 ["Expand Nested Folders" mh-speed-expand-folder 78 ["Contract Nested Folders" mh-speed-contract-folder 84 (defvar mh-show-speedbar-menu-items mh-folder-speedbar-menu-items) 85 (defvar mh-letter-speedbar-menu-items mh-folder-speedbar-menu-items) 92 (defvar mh-folder-speedbar-key-map (speedbar-make-specialized-keymap) 95 (gnus-define-keys mh-folder [all...] |
H A D | mh-folder.el | 1 ;;; mh-folder.el --- MH-Folder mode 40 (autoload 'mh-tool-bar-folder-buttons-init "mh-tool-bar") 54 Scan an MH folder if ARG is non-nil. 61 (call-interactively 'mh-visit-folder) 63 (mh-visit-folder mh-inbox (symbol-name mh-unseen-seq))) 64 (mh-inc-folder))) 68 "Check for new mail in inbox folder. 69 Scan an MH folder if ARG is non-nil. 76 (call-interactively 'mh-visit-folder) 77 (mh-visit-folder m [all...] |
H A D | mh-funcs.el | 46 "Break up digest into separate messages\\<mh-folder-mode-map>. 63 (mh-process-or-undo-commands mh-current-folder) 64 (mh-set-folder-modified-p t) ; lock folder while bursting 66 (mh-exec-cmd "burst" mh-current-folder digest "-inplace") 67 (with-mh-folder-updating (t) 75 (defun mh-copy-msg (range folder) 76 "Copy RANGE to FOLDER\\<mh-folder-mode-map>. 78 If you wish to copy a message to another folder, you can use this 81 of the target folder an [all...] |
H A D | mh-search.el | 63 Expected to return a list of three strings: name of the folder, 69 (defvar mh-index-folder "+mhe-index" 72 (defvar mh-flists-results-folder "sequence" 73 "Subfolder for `mh-index-folder' where flists output is placed.") 85 (defun mh-search (folder search-regexp 103 listed folder. 138 \\[mh-to-field] to help you fill in the blanks.\\<mh-folder-mode-map> 152 The messages that are found are put in a temporary sub-folder of 155 folders; each set of messages from a given folder has a heading 156 with the folder nam [all...] |
H A D | mh-seq.el | 95 (folders-changed (list mh-current-folder)) 125 (folders-changed (list mh-current-folder))) 142 "List all sequences in folder. 146 (let ((folder mh-current-folder) 155 (insert "Sequences in folder " folder ":\n") 192 (let* ((dest-folder (loop for seq in mh-refile-list 195 (deleted-flag (unless dest-folder (member message mh-delete-list)))) 198 (cond (dest-folder (forma [all...] |
H A D | mh-letter.el | 57 (fcc . mh-folder-expand-at-point) 315 (make-local-variable 'mh-sent-from-folder) 385 (defun mh-insert-letter (folder message verbatim) 389 defaults to the current message in that folder. It then inserts 401 (let* ((folder 402 (mh-prompt-for-folder "Message from" mh-sent-from-folder nil)) 404 (if (equal folder mh-sent-from-folder) 405 (or mh-sent-from-msg (nth 0 (mh-translate-range folder "cu [all...] |
H A D | mh-print.el | 59 "Print RANGE\\<mh-folder-mode-map>. 93 (let* ((folder mh-current-folder) 95 (if (not (equal (mh-msg-filename msg folder) 102 (mh-display-msg msg folder))) 124 "Print RANGE to FILE\\<mh-folder-mode-map>. 191 "Print RANGE the old fashioned way\\<mh-folder-mode-map>. 219 mh-current-folder msgs-string)) 222 mh-current-folder range))))) 238 (format "%s/%s" mh-current-folder ms [all...] |
H A D | mh-mime.el | 257 (mh-folder-mime-action 269 (folder mh-show-folder-buffer) 274 (mh-handle-set-external-undisplayer folder handle function))) 280 (defun mh-folder-inline-mime-part (part-index) 294 (mh-folder-mime-action part-index #'mh-mime-inline-part nil)) 323 (defun mh-folder-save-mime-part (part-index) 338 (mh-folder-mime-action part-index #'mh-mime-save-part nil)) 352 (defun mh-folder-toggle-mime-part (part-index) 368 (mh-folder [all...] |
H A D | mh-comp.el | 120 "Regexp of header lines to remove before offering a message as a new draft\\<mh-folder-mode-map>. 307 mh-sent-from-folder 356 up again with this command. If you don't use a draft folder, your 358 you'll need to visit the draft folder with \"\\[mh-visit-folder] 374 (let* ((from-folder mh-current-folder) 377 (cond ((and mh-draft-folder (equal from-folder mh-draft-folder)) [all...] |
/macosx-10.9.5/emacs-92/emacs/lisp/gnus/ |
H A D | gnus-mh.el | 47 (defun gnus-summary-save-article-folder (&optional arg) 48 "Append the current article to an mh folder. 55 (let ((gnus-default-article-saver 'gnus-summary-save-in-folder)) 58 (defun gnus-summary-save-in-folder (&optional folder) 59 "Save this article to MH folder (using `rcvstore' in MH library). 60 Optional argument FOLDER specifies folder name." 63 (let ((folder 64 (cond ((and (eq folder 'default) 65 gnus-newsgroup-last-folder) [all...] |
H A D | gnus-vm.el | 60 (defun gnus-vm-make-folder (&optional buffer) 62 (tmp-folder (generate-new-buffer " *tmp-folder*")) 65 (set-buffer tmp-folder) 78 tmp-folder)) 81 "Append the current article to a vm folder. 91 (defun gnus-summary-save-in-vm (&optional folder) 93 (setq folder 95 "Save %s in VM folder:" folder [all...] |
/macosx-10.9.5/procmail-14/procmail/src/ |
H A D | comsat.h | 6 setlfcs P((const char*folder)), 8 sendcomsat P((const char*folder));
|
H A D | comsat.c | 33 void setlfcs(folder)const char*folder; /* set lastfolder for comsat */ 35 if(strchr(dirsep,*folder)) /* absolute filename? */ 36 new=tstrdup(folder); 39 size_t len=strlen(md)+2+strlen(folder); 43 strlcat(new,folder,len); 119 void sendcomsat(folder)const char*folder; 125 if(!(p=folder?folder [all...] |
H A D | variables.h | 16 setlastfolder P((const char*const folder)),
|
/macosx-10.9.5/tidy-15.12/tidy/htmldoc/api/ |
H A D | treeview.js | 11 // 27 Jan 98 - Root folder starts open; support for USETEXTLINKS; 76 function propagateChangesInState(folder) 80 if (folder.isOpen) 82 if (folder.nodeImg) 83 if (folder.isLastNode) 84 folder.nodeImg.src = "ftv2mlastnode.png" 86 folder.nodeImg.src = "ftv2mnode.png" 87 folder.iconImg.src = "ftv2folderopen.png" 88 for (i=0; i<folder.nChildren; i++) 89 folder [all...] |
/macosx-10.9.5/mDNSResponder-522.92.1/mDNSWindows/ |
H A D | loclibrary.c | 111 char folder[MAX_PATH]; local 115 GetModuleFileNameA( module, folder, MAX_PATH ); 117 // Get folder string 119 app = strrchr( folder, '\\' ); 130 snprintf( appPathNameA, MAX_PATH, "%s\\%s", folder, app ); 148 wchar_t folder[MAX_PATH]; local 152 GetModuleFileNameW( module, folder, MAX_PATH); 154 // Get folder string 156 app = wcsrchr( folder, '\\' ); 167 swprintf( appPathNameW, MAX_PATH, L"%ls\\%ls", folder, ap [all...] |
/macosx-10.9.5/ruby-104/ruby/ext/tk/sample/tkextlib/treectrl/ |
H A D | outlook-folders.rb | 2 # Demo: Outlook Express folder list 25 t.element_create('e5', :image, :image=>@images['outlook-folder']) 47 # folder + text 54 # folder + text + text 78 [1, :folder, "Messages to Dad", false, 0], 79 [1, :folder, "Messages to Sis", false, 0], 80 [1, :folder, "Messages to Me", false, 0], 81 [2, :folder, "2001", false, 0], 82 [2, :folder, "2000", false, 0], 83 [2, :folder, "199 [all...] |
/macosx-10.9.5/postfix-252/postfix/src/postlock/ |
H A D | postlock.c | 5 /* lock mail folder and execute command 131 msg_fatal("usage: %s [-c config_dir] [-l lock_style] [-v] folder command...", myname); 148 char *folder; local 216 folder = argv[optind]; 228 * Lock the folder for exclusive access. Lose the lock upon exit. The 232 if ((mp = mbox_open(folder, O_APPEND | O_WRONLY | O_CREAT, 235 msg_fatal("open file %s: %s", folder, vstring_str(why->reason));
|
/macosx-10.9.5/tcl-102/tcl_ext/tktreectrl/tktreectrl/demos/ |
H A D | outlook-folders.tcl | 4 # Demo: Outlook Express folder list 41 $T element create elemImgFolder image -image outlook-folder 64 # folder + text 71 # folder + text + text 97 1 folder "Messages to Dad" no 0 98 1 folder "Messages to Sis" no 0 99 1 folder "Messages to Me" yes 5 100 2 folder "2001" no 0 101 2 folder "2000" no 0 102 2 folder "199 [all...] |
/macosx-10.9.5/tidy-15.12/tidy/test/ |
H A D | acctest.cmd | 20 @REM set INPUT folder 22 @REM set OUTPUT folder 58 @echo ERROR: Unable to locate input folder - [%TIDYINPUT%]! - check name and location ...
|
/macosx-10.9.5/ruby-104/ruby/test/win32ole/ |
H A D | test_win32ole.rb | 241 folder = shell.nameSpace(0) 242 assert_instance_of(WIN32OLE, folder) 247 folder = shell.nameSpace(0) 248 item = folder.items.item(0) 249 name = folder.getDetailsOf(item, 0) 251 name = folder.getDetailsOf({:vItem => item, :iColumn => 0}) 253 name = folder.getDetailsOf({"vItem" => item, :iColumn => 0}) 259 folder = shell.nameSpace(0) 260 item = folder.items.item(0) 261 name = folder [all...] |