home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The AGA Experience 2
/
agavol2.iso
/
software
/
utilities
/
comms
/
metamail-2.3a
/
elm113diffs.lha
/
rtsup.diff
< prev
next >
Wrap
Text File
|
1992-06-14
|
2KB
|
93 lines
*** Elm113/rtsup.c Sat Mar 14 21:22:00 1992
--- new/rtsup.c Fri May 08 17:56:51 1992
***************
*** 12,21 ****
#include <proto/dos.h>
#include <proto/reqtools.h>
#endif
! struct ReqToolsBase *ReqToolsBase = NULL;
Prototype void OpenReqToolsLib(void);
Prototype void CloseReqToolsLib(void);
--- 12,33 ----
#include <proto/dos.h>
#include <proto/reqtools.h>
#endif
+ #ifdef DICE
+ #include <clib/exec_protos.h>
+ #include <clib/dos_protos.h>
+ #include <clib/reqtools_protos.h>
+ #endif
+ #ifdef KDFREQ
+ #include <clib/kd_freq_protos.h>
+ #include <libraries/KDBase.h>
! struct Library *KD_FReqBase = NULL;
! static struct FRequest *kd_f_requester = NULL;
! #endif
+ struct ReqToolsBase *ReqToolsBase = NULL;
+
Prototype void OpenReqToolsLib(void);
Prototype void CloseReqToolsLib(void);
***************
*** 30,35 ****
--- 42,54 ----
void OpenReqToolsLib(void)
{
ReqToolsBase=(struct ReqToolsBase *)OpenLibrary("reqtools.library",37L);
+ #ifdef KDFREQ
+ if (KD_FReqBase = OpenLibrary(KLIBNAME,KLIBVERSION)) {
+ if (kd_f_requester = CreateFRequest()) {
+ kd_f_requester->reqtitle = (UBYTE *) "Pick a file";
+ }
+ }
+ #endif
}
***************
*** 39,44 ****
--- 58,69 ----
if (ReqToolsBase)
CloseLibrary((struct Library *)ReqToolsBase);
ReqToolsBase = NULL;
+ #ifdef KDFREQ
+ if (kd_f_requester)
+ DeleteFRequest(kd_f_requester);
+ if (KD_FReqBase)
+ CloseLibrary(KD_FReqBase);
+ #endif
}
***************
*** 70,75 ****
--- 95,115 ----
BPTR oldlock,newlock;
char filename[109];
+ #ifdef KDFREQ
+ char *selected_file;
+ if (kd_f_requester) {
+ if (strcmp(dir, kd_f_requester->directory)) {
+ strcpy(kd_f_requester->directory, dir);
+ strcpy(kd_f_requester->filename, file);
+ }
+ if (selected_file = (char *)NewFReq(kd_f_requester)) {
+ strcpy(res, selected_file);
+ return(TRUE);
+ } else {
+ return(FALSE);
+ }
+ }
+ #endif
if (ReqToolsBase) {
if (strlen(dir)>0) {
if (newlock=Lock(dir,SHARED_LOCK))