fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2012-01-06 12:12 UTC+0100 Francesco Saverio Giudice (info/at/fsgiudice.com)

Browse Source 
* harbour/contrib/hbblat/blatcls.prg
     * Update copyright years
     * Updated to 2.7.6 blat version
     + Added lNoMD5 class var for -nomd5 option
     + Added cContentType class var for -contentType <string> option
     * Fixed error in ArrayToString() when file name contains " char
This commit is contained in:
Francesco Saverio Giudice
2012-01-06 11:13:17 +00:00
parent 053f90539d
commit b67576e984
2 changed files with 34 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

28
harbour/ChangeLog
View File

@@ -16,6 +16,14 @@
The license applies to all entries newer than 2009-04-28.
*/
2012-01-06 12:12 UTC+0100 Francesco Saverio Giudice (info/at/fsgiudice.com)
* harbour/contrib/hbblat/blatcls.prg
* Update copyright years
* Updated to 2.7.6 blat version
+ Added lNoMD5 class var for -nomd5 option
+ Added cContentType class var for -contentType <string> option
* Fixed error in ArrayToString() when file name contains " char
2012-01-05 14:47 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
* harbour/include/hbrdddbf.h
* moved DBF record lock range for DB_DBFLOCK_HB64 to avoid potential
@@ -41,14 +49,14 @@
* Minor.
* contrib/hbide/finddialog.ui
* Changed: the appearance and a bit of functionality of
* Changed: the appearance and a bit of functionality of
"Find & Replace" dialog. It was occupying larger desktop
territory than needed, which, at times is too precious.
* contrib/hbide/idefindreplace.prg
* Reworked: the way "Find What" edit control of "Find & Replace"
dialog was behaving. Now it is almost at par with XMate.
* Fixed: the window coordinates were not being maintained either
* Fixed: the window coordinates were not being maintained either
with repositioning or close via "X" button.
2012-01-03 15:40 UTC+0100 Przemyslaw Czerpak (druzus/at/poczta.onet.pl)
@@ -130,8 +138,8 @@
* contrib/gtwvg/wvgwin.c
* contrib/gtwvg/wvgwing.c
! Removed: TCHAR_* macros, almost.
Only 6 occurances are still present in the code which I do not
know how to cover.
Only 6 occurances are still present in the code which I do not
know how to cover.
* contrib/gtwvg/wvgmenub.prg
! Adapted: the conversion of character '~' to '&' at prg level
@@ -182,12 +190,12 @@
2011-12-29 16:01 UTC+0100 Viktor Szakats (harbour syenar.hu)
* INSTALL
* further clarified the way to submit diffs (use _one_ .dif
file created from root of SVN sandbox using 'svn diff', use
* further clarified the way to submit diffs (use _one_ .dif
file created from root of SVN sandbox using 'svn diff', use
extension '.zip')
* clarified the names of mailing list.
* clarified which mingw tdm 4.6.1 version is okay.
* simplified to use 'zip' tool and .zip extension for submitted
* simplified to use 'zip' tool and .zip extension for submitted
logs.
2011-12-25 14:47 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
@@ -209,14 +217,14 @@
+ Added: version dependant :scroll() methods.
+ contrib/hbqt/qtgui/qth/QPrintPreviewWidget.qth
+ Added: QPrintPreviewWidget class.
Patch provided by Bacco, thank you.
Patch provided by Bacco, thank you.
2011-12-24 01:30 UTC-0800 Pritpal Bedi (bedipritpal@hotmail.com)
* contrib/gtwvg/gtwvg.c
* contrib/gtwvg/gtwvg.h
! Synchronized: with GTWVT as much possible.
! Synchronized: with GTWVT as much possible.
Mainly eliminated TCHAR_* macros and used hb_str* api.
Also tried to synchronize codepage issue, not sure
Also tried to synchronize codepage issue, not sure
how much I succeeded.
2011-12-24 10:31 UTC+0100 Viktor Szakats (harbour syenar.hu)

20
harbour/contrib/hbblat/blatcls.prg
View File

@@ -6,7 +6,7 @@
* Harbour Project source code:
* BLAT wrapper library interface code.
*
* Copyright 2007-2009 Francesco Saverio Giudice <info@fsgiudice.com>
* Copyright 2007-2012 Francesco Saverio Giudice <info@fsgiudice.com>
* www - http://harbour-project.org
*
* This program is free software; you can redistribute it and/or modify
@@ -63,8 +63,8 @@ CREATE CLASS HBBlat
VAR cError AS STRING INIT ""
VAR aErrors AS ARRAY INIT {}
VAR cCommand AS STRING INIT ""
VAR cVersion AS STRING INIT "0.1"
VAR cBlatVersion AS STRING INIT "2.6.2"
VAR cVersion AS STRING INIT "0.2"
VAR cBlatVersion AS STRING INIT "2.7.6"
VAR lChecked AS LOGICAL INIT .F.
EXPORTED:
@@ -116,6 +116,7 @@ CREATE CLASS HBBlat
VAR cPasswordPOP3 AS STRING
VAR cUserIMAP AS STRING
VAR cPasswordIMAP AS STRING
VAR lNoMD5 AS LOGICAL INIT .F. // if .T. Do NOT use CRAM-MD5 authentication. Use this in cases where the server's CRAM-MD5 is broken, such as Network Solutions
// Miscellaneous RFC header switches
VAR cOrganization AS STRING
@@ -163,6 +164,7 @@ CREATE CLASS HBBlat
VAR lAskFor8BitMime AS LOGICAL INIT .F. // ask for 8bit data support when sending MIME
VAR nMultipartSize AS NUMERIC // send multipart messages, breaking attachments on <size> KB boundaries, where <size> is per 1000 bytes
VAR lNoMultipartMessage AS LOGICAL INIT .F. // do not allow multipart messages
VAR cContentType AS STRING // use cContentType in the ContentType header for attachments that do not have a registered content type for the extension. For example: -contenttype "text/calendar"
// NNTP specific options
VAR cGroups AS STRING // list of newsgroups (comma separated)
@@ -539,6 +541,11 @@ METHOD PROCEDURE Check() CLASS HBBlat
::cCommand += ' -ipw ' + ::cPasswordIMAP
ENDIF
// lNoMD5
IF ::lNoMD5
::cCommand += " -nomd5"
ENDIF
// Miscellaneous RFC header switches ----------------------
// cOrganization
@@ -791,6 +798,11 @@ METHOD PROCEDURE Check() CLASS HBBlat
::cCommand += " -nomps"
ENDIF
// cContentType - optional
IF ISCHARACTER( ::cContentType )
::cCommand += ' -contentType ' + ::cContentType
ENDIF
// NNTP specific options ------------------
// cGroups - optional
@@ -975,7 +987,7 @@ STATIC FUNCTION ArrayToString( aArray )
LOCAL cElem
FOR EACH cElem IN aArray
cString += cElem + iif( cElem:__enumIndex() < nLen, ",", "" )
cString += IIF( '"' $ cElem, "'" + cElem + "'", '"' + cElem + '"' ) + iif( cElem:__enumIndex() < nLen, ",", "" )
NEXT
RETURN cString