Check-in [e1e47e29d0]
Not logged in

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Bump version number
Timelines: family | ancestors | descendants | both | trunk | 0.6.6-20180517
Files: files | file ages | folders
SHA1: e1e47e29d07b6bba98f6d74d10331eab3d5597fe
User & Date: bernd 2018-05-16 22:53:56
Context
2018-05-16
23:21
After-bump cleanup check-in: c131e9d178 user: bernd tags: trunk
22:53
Bump version number check-in: e1e47e29d0 user: bernd tags: trunk, 0.6.6-20180517
20:35
CSS change, add hslider for chat log check-in: 175130c450 user: bernd tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to configure.ac.

11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU Affero General Public License for more details.

# You should have received a copy of the GNU Affero General Public License
# along with this program.  If not, see <http://www.gnu.org/licenses/>.

AC_INIT([net2o], [0.6.5-20180510], [bernd@net2o.de], [net2o], [https://fossil.net2o.de/net2o/reportlist])
AC_PREREQ([2.59])
AC_CONFIG_MACRO_DIR([m4])
AC_USE_SYSTEM_EXTENSIONS
LT_INIT

AC_MSG_CHECKING([for gforth])








|







11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU Affero General Public License for more details.

# You should have received a copy of the GNU Affero General Public License
# along with this program.  If not, see <http://www.gnu.org/licenses/>.

AC_INIT([net2o], [0.6.6-20180517], [bernd@net2o.de], [net2o], [https://fossil.net2o.de/net2o/reportlist])
AC_PREREQ([2.59])
AC_CONFIG_MACRO_DIR([m4])
AC_USE_SYSTEM_EXTENSIONS
LT_INIT

AC_MSG_CHECKING([for gforth])

Changes to gui.fs.

414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429

wmsg-class ' new static-a with-allocater Constant wmsg-o
wmsg-o >o msg-table @ token-table ! o>

: wmsg-display ( addr u -- )
    !date wmsg-o .msg-display ;

#80 Value gui-msgs# \ display last 80 messages
\ !!FIXME!! more if viewport can grow indefinite

: gui-msgs ( gaddr u -- )
    2dup >load-group ?msg-log
    last# msg-log@ 2dup { log u }
    dup gui-msgs# cells - 0 max /string bounds ?DO
	I $@ ['] wmsg-display catch IF
	    <err> ." invalid entry" <default> cr 2drop







|
<







414
415
416
417
418
419
420
421

422
423
424
425
426
427
428

wmsg-class ' new static-a with-allocater Constant wmsg-o
wmsg-o >o msg-table @ token-table ! o>

: wmsg-display ( addr u -- )
    !date wmsg-o .msg-display ;

#512 Value gui-msgs# \ display last 300 messages


: gui-msgs ( gaddr u -- )
    2dup >load-group ?msg-log
    last# msg-log@ 2dup { log u }
    dup gui-msgs# cells - 0 max /string bounds ?DO
	I $@ ['] wmsg-display catch IF
	    <err> ." invalid entry" <default> cr 2drop